annotate tests/pkeyEscape.ur @ 1845:c1e3805e604e

Make Scriptcheck catch more script/message-passing uses, and move the phase earlier in compilation
author Adam Chlipala <adam@chlipala.net>
date Fri, 15 Mar 2013 16:09:55 -0400
parents f7d9dc5d57eb
children
rev   line source
adam@1722 1 table t : {A : int, B : int}
adam@1722 2 PRIMARY KEY {{primary_key [#A] [[B = _]]}}
adam@1722 3
adam@1722 4 fun main () : transaction page =
adam@1722 5 queryI (SELECT * FROM t) (fn _ => return ());
adam@1722 6 return <xml/>