summaryrefslogtreecommitdiff
path: root/src/monoize.sml
diff options
context:
space:
mode:
authorGravatar Ziv Scully <ziv@mit.edu>2014-11-29 04:34:41 -0500
committerGravatar Ziv Scully <ziv@mit.edu>2014-11-29 04:34:41 -0500
commit219524359a25417b9e140130ab77a9a330c41012 (patch)
treea40ae14f63bd4772aaf43838eca541062ceb0de0 /src/monoize.sml
parentdd7c117bda5f84bfb45aeaf3da14f1dee60e7867 (diff)
Remove Sqlcache urlification hack.
Diffstat (limited to 'src/monoize.sml')
-rw-r--r--src/monoize.sml3
1 files changed, 0 insertions, 3 deletions
diff --git a/src/monoize.sml b/src/monoize.sml
index 5c314c54..fa69b3af 100644
--- a/src/monoize.sml
+++ b/src/monoize.sml
@@ -1982,9 +1982,6 @@ fun monoExp (env, st, fm) (all as (e, loc)) =
initial = (L'.ERel 1, loc),
sqlcacheInfo = urlifiedRel0},
loc)
- val body = if Settings.getSqlcache ()
- then Sqlcache.instrumentQuery (body, urlifiedRel0)
- else body
in
((L'.EAbs ("q", s, (L'.TFun (ft, (L'.TFun (state, (L'.TFun (un, state), loc)), loc)), loc),
(L'.EAbs ("f", ft, (L'.TFun (state, (L'.TFun (un, state), loc)), loc),