Add 'role' data attribute. Note, that 'role' attribute is a part of reach ARIA API described here: http://www.w3.org/TR/wai-aria/ Among 'role', it defines lots of aria-* attributes

table t : {A : int, B : int}
  PRIMARY KEY {{primary_key [#A] [[B = _]]}}

fun main () : transaction page =
    queryI (SELECT * FROM t) (fn _ => return ());
    return <xml/>