diff options
Diffstat (limited to 'caching-tests/test.ur')
| -rw-r--r-- | caching-tests/test.ur | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/caching-tests/test.ur b/caching-tests/test.ur index 06ed456c..931612bc 100644 --- a/caching-tests/test.ur +++ b/caching-tests/test.ur @@ -3,7 +3,7 @@ table foo10 : {Id : int, Bar : string} PRIMARY KEY Id table tab : {Id : int, Val : int} PRIMARY KEY Id fun cache01 () = - res <- oneOrNoRows (SELECT foo01.Bar FROM foo01 WHERE foo01.Id = 42); + res <- oneOrNoRows (SELECT foo01.Bar FROM foo01 WHERE foo01.Id = 43); return <xml><body> Reading 1. {case res of @@ -33,7 +33,8 @@ fun cache11 () = </body></xml> fun flush01 () = - dml (UPDATE foo01 SET Bar = "baz01" WHERE Id = 42); + dml (INSERT INTO foo01 (Id, Bar) VALUES (42, "baz01")); + (* dml (UPDATE foo01 SET Bar = "baz01" WHERE Id = 42); *) return <xml><body> Flushed 1! </body></xml> |