view tests/t_t.ur @ 2115:3dc020fb2aa1

An Emacs urweb-mode optimization contributed by John Wiegley
author Adam Chlipala <adam@chlipala.net>
date Wed, 11 Feb 2015 13:12:59 -0500
parents 8fce85939259
children
line wrap: on
line source
table t : {A : int, B : string}

task initialize = fn () => dml (UPDATE t SET A = A + 1 WHERE TRUE);
                     dml (UPDATE t SET B = 'q' WHERE TRUE)