view tests/init.ur @ 1122:85d194409b17

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
line wrap: on
line source
sequence seq
table fred : {A : int, B : int}

task initialize =
    setval seq 1;
    dml (INSERT INTO fred (A, B) VALUES (0, 1))