Mercurial > urweb
annotate tests/init.ur @ 1795:d28adceef22a
Allow type class instances with hypotheses via local ('let') definitions
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Wed, 25 Jul 2012 14:04:59 -0400 |
parents | 8a169fc0838b |
children |
rev | line source |
---|---|
adamc@1073 | 1 sequence seq |
adamc@1073 | 2 table fred : {A : int, B : int} |
adamc@1073 | 3 |
adam@1348 | 4 task initialize = fn () => |
adamc@1073 | 5 setval seq 1; |
adamc@1073 | 6 dml (INSERT INTO fred (A, B) VALUES (0, 1)) |