Mercurial > urweb

comparison src/checknest.sml @ 1293:acabf3935060

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tryDml
author Adam Chlipala <adam@chlipala.net>
date Sun, 05 Sep 2010 14:00:57 -0400
parents 7a31e0cf25e9
children 0577be31a435
comparison
equal deleted inserted replaced
1292:a671c986f517 1293:acabf3935060
136 prepared = case prepared of 136 prepared = case prepared of
137 NONE => NONE 137 NONE => NONE
138 | SOME {id, query, ...} => SOME {id = id, query = query, 138 | SOME {id, query, ...} => SOME {id = id, query = query,
139 nested = IS.member (expUses globals body, id)}}, 139 nested = IS.member (expUses globals body, id)}},
140 loc) 140 loc)
141 | EDml {dml, prepared} => 141 | EDml {dml, prepared, mode} =>
142 (EDml {dml = ae dml, 142 (EDml {dml = ae dml,
143 prepared = prepared}, loc) 143 prepared = prepared,
144 mode = mode}, loc)
144 145
145 | ENextval {seq, prepared} => 146 | ENextval {seq, prepared} =>
146 (ENextval {seq = ae seq, 147 (ENextval {seq = ae seq,
147 prepared = prepared}, loc) 148 prepared = prepared}, loc)
148 | ESetval {seq, count} => 149 | ESetval {seq, count} =>