diff src/lru_cache.sml @ 2289:78820fa8f5a7

Fix bugs for lock calculation and SQL parsing and add support for tasks.
author Ziv Scully <ziv@mit.edu>
date Sun, 15 Nov 2015 14:18:35 -0500
parents 98f96a976ede
children 5104e480b3e3
line wrap: on
line diff
--- a/src/lru_cache.sml	Fri Nov 13 11:03:09 2015 -0500
+++ b/src/lru_cache.sml	Sun Nov 15 14:18:35 2015 -0500
@@ -111,16 +111,16 @@
              (* If the output is null, it means we had too much recursion, so it's a miss. *)
              string "  if (v && v->output != NULL) {",
              newline,
-             string ("    puts(\"SQLCACHE: hit " ^ i ^ ".\");"),
-             newline,
+             (* string ("    puts(\"SQLCACHE: hit " ^ i ^ ".\");"), *)
+             (* newline, *)
              string "    uw_write(ctx, v->output);",
              newline,
              string "    return v->result;",
              newline,
              string "  } else {",
              newline,
-             string ("    puts(\"SQLCACHE: miss " ^ i ^ ".\");"),
-             newline,
+             (* string ("    puts(\"SQLCACHE: miss " ^ i ^ ".\");"), *)
+             (* newline, *)
              string "    uw_recordingStart(ctx);",
              newline,
              string "    return NULL;",
@@ -142,8 +142,8 @@
              newline,
              string "  v->output = uw_recordingRead(ctx);",
              newline,
-             string ("  puts(\"SQLCACHE: stored " ^ i ^ ".\");"),
-             newline,
+             (* string ("  puts(\"SQLCACHE: stored " ^ i ^ ".\");"), *)
+             (* newline, *)
              string ("  uw_Sqlcache_store(ctx, cache" ^ i ^ ", ks, v);"),
              newline,
              string "  return uw_unit_v;",