Mercurial > urweb

annotate tests/init.ur @ 1122:85d194409b17

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Reduce concatenations of the empty record; unpoly non-recursive functions
author Adam Chlipala <adamc@hcoop.net>
date Sun, 10 Jan 2010 13:44:22 -0500
parents 0657e5adc938
children 8a169fc0838b
rev   line source
adamc@1073 1 sequence seq
adamc@1073 2 table fred : {A : int, B : int}
adamc@1073 3
adamc@1075 4 task initialize =
adamc@1073 5 setval seq 1;
adamc@1073 6 dml (INSERT INTO fred (A, B) VALUES (0, 1))