aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/lru_cache.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/lru_cache.sml')
-rw-r--r--src/lru_cache.sml3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/lru_cache.sml b/src/lru_cache.sml
index b8dfde5e..275c3061 100644
--- a/src/lru_cache.sml
+++ b/src/lru_cache.sml
@@ -91,7 +91,8 @@ fun setupQuery {index, params} =
newline,
string (" uw_Sqlcache_CacheValue *v = uw_Sqlcache_check(cache" ^ i ^ ", ks);"),
newline,
- string " if (v) {",
+ (* 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,