Mercurial > urweb

diff src/scriptcheck.sml @ 1073:b2311dfb3158

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initializers and setval
author Adam Chlipala <adamc@hcoop.net>
date Sun, 13 Dec 2009 14:20:41 -0500
parents 217eb87dde31
children 72670131dace
line wrap: on
line diff
--- a/src/scriptcheck.sml	Sun Dec 13 13:00:55 2009 -0500
+++ b/src/scriptcheck.sml	Sun Dec 13 14:20:41 2009 -0500
@@ -114,6 +114,7 @@
                                                               orelse hasClient initial
                       | EDml {dml, ...} => hasClient dml
                       | ENextval {seq, ...} => hasClient seq
+                      | ESetval {seq, count, ...} => hasClient seq orelse hasClient count
                       | EUnurlify (e, _) => hasClient e
             in
                 hasClient