diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-11-11 16:51:45 -0500 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-11-11 16:51:45 -0500 |
| commit | 6fc6d97b44658bbd4fc279be5964cf6187772f3c (patch) | |
| tree | 68a3b385a020c89ab76b4a3bbebd9207c8123dd4 /src/prepare.sml | |
| parent | 2fe3fd104e8a4de9810e450d6d2e166f5534b360 (diff) | |
Fix demo regression
Diffstat (limited to 'src/prepare.sml')
| -rw-r--r-- | src/prepare.sml | 2 |
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, |