Mercurial > urweb

comparison demo/noisy.ur @ 708:1a317a707d71

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add primary keys to demo
author Adam Chlipala <adamc@hcoop.net>
date Tue, 07 Apr 2009 16:22:11 -0400
parents bab524996fca
children 15ddd64a5113
comparison
equal deleted inserted replaced
707:d8217b4cb617 708:1a317a707d71
1 datatype list t = Nil | Cons of t * list t 1 datatype list t = Nil | Cons of t * list t
2 2
3 table t : { Id : int, A : string } 3 table t : { Id : int, A : string }
4 PRIMARY KEY Id
4 5
5 fun add id s = 6 fun add id s =
6 dml (INSERT INTO t (Id, A) VALUES ({[id]}, {[s]})) 7 dml (INSERT INTO t (Id, A) VALUES ({[id]}, {[s]}))
7 8
8 fun del id = 9 fun del id =