diff caching-tests/test.ur @ 2295:e6c5bb62fef8

Fix SQL parser JOIN bug and fix ON clause logic in Sqlcache.
author Ziv Scully <ziv@mit.edu>
date Thu, 19 Nov 2015 03:45:39 -0500
parents f8903af753ff
children
line wrap: on
line diff
--- a/caching-tests/test.ur	Thu Nov 19 01:59:00 2015 -0500
+++ b/caching-tests/test.ur	Thu Nov 19 03:45:39 2015 -0500
@@ -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 = *)