diff caching-tests/bench.ur @ 2293:8be54d7bd06e

Trivial change to benchmark.
author Ziv Scully <ziv@mit.edu>
date Wed, 18 Nov 2015 14:48:24 -0500
parents 23eaec04e0f8
children
line wrap: on
line diff
--- a/caching-tests/bench.ur	Tue Nov 17 04:08:12 2015 -0500
+++ b/caching-tests/bench.ur	Wed Nov 18 14:48:24 2015 -0500
@@ -3,14 +3,14 @@
 fun check id =
     res <- oneOrNoRows (SELECT tab.Val FROM tab WHERE tab.Id = {[id]});
     return <xml><body>
-      cache
+      Value at {[id]} is
       {case res of
-           None => <xml>?</xml>
-         | Some row => <xml>{[row.Tab.Val]}</xml>}
+           None => <xml>unknown</xml>
+         | Some row => <xml>{[row.Tab.Val]}</xml>}.
     </body></xml>
 
 fun flush id =
     dml (UPDATE tab SET Val = Val + 1 WHERE Id = {[id]});
     return <xml><body>
-      Changed {[id]}!
+      Incremented value at {[id]} (if it exists).
     </body></xml>