summaryrefslogtreecommitdiff
path: root/caching-tests/test.ur
diff options
context:
space:
mode:
Diffstat (limited to 'caching-tests/test.ur')
-rw-r--r--caching-tests/test.ur5
1 files changed, 3 insertions, 2 deletions
diff --git a/caching-tests/test.ur b/caching-tests/test.ur
index ea64bb2d..e0dab927 100644
--- a/caching-tests/test.ur
+++ b/caching-tests/test.ur
@@ -1,12 +1,13 @@
table tab : {Id : int, Val : int, Foo : int} PRIMARY KEY Id
fun cache id =
- res <- oneOrNoRows (SELECT tab.Val FROM tab WHERE tab.Id = {[id]});
+ res <- oneOrNoRows (SELECT A.Val FROM (tab AS A JOIN tab AS B ON A.Id = B.Id)
+ WHERE B.Id = {[id]});
return <xml><body>
cache
{case res of
None => <xml>?</xml>
- | Some row => <xml>{[row.Tab.Val]}</xml>}
+ | Some row => <xml>{[row.A.Val]}</xml>}
</body></xml>
(* fun cacheAlt id = *)