Mercurial > urweb
changeset 2205:cdea39473c78
Forgets deleted files.
author | Ziv Scully <ziv@mit.edu> |
---|---|
date | Tue, 27 May 2014 21:15:53 -0400 |
parents | 01c8aceac480 |
children | c1a62ce47083 |
files | sqlcache-tests/test.ur sqlcache-tests/test.urp sqlcache-tests/test.urs |
diffstat | 3 files changed, 0 insertions(+), 27 deletions(-) [+] |
line wrap: on
line diff
--- a/sqlcache-tests/test.ur Tue May 27 21:14:13 2014 -0400 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,22 +0,0 @@ -table foo : {Id : int, Bar : string} PRIMARY KEY Id - -(* val query = (SELECT * FROM foo WHERE foo.Bar = "baz") *) -(* val insert = (INSERT INTO foo (Id, Bar) VALUES (42, "baz")) *) - -fun main () : transaction page = - dml (INSERT INTO foo (Id, Bar) VALUES (42, "baz")); - res <- oneOrNoRows (SELECT foo.Id, foo.Bar - FROM foo - WHERE foo.Bar = "baz" - UNION - SELECT * - FROM foo - WHERE foo.Bar = "qux"); - return - <xml> - <body> - {case res of - None => <xml></xml> - | Some row => <xml>{[row.Foo.Bar]}</xml>} - </body> - </xml>