aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/prepare.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-11-11 16:51:45 -0500
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-11-11 16:51:45 -0500
commit16c1bacfe1116391bb7b9a459e7ad53930f2719b (patch)
tree68a3b385a020c89ab76b4a3bbebd9207c8123dd4 /src/prepare.sml
parent4ec6c9e24ebb58cd62b6f9d69447fae314aac82d (diff)
Fix demo regression
Diffstat (limited to 'src/prepare.sml')
-rw-r--r--src/prepare.sml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/prepare.sml b/src/prepare.sml
index 28c14639..708bcade 100644
--- a/src/prepare.sml
+++ b/src/prepare.sml
@@ -183,7 +183,7 @@ fun prepExp (e as (_, loc), sns) =
NONE =>
((EQuery {exps = exps, tables = tables, rnum = rnum,
state = state, query = query, body = body,
- initial = initial, prepared = SOME (#2 sns)}, loc),
+ initial = initial, prepared = NONE}, loc),
sns)
| SOME (ss, n) =>
((EQuery {exps = exps, tables = tables, rnum = rnum,