summaryrefslogtreecommitdiff
path: root/src/scriptcheck.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/scriptcheck.sml')
-rw-r--r--src/scriptcheck.sml1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/scriptcheck.sml b/src/scriptcheck.sml
index 6dc11c65..5cd056d5 100644
--- a/src/scriptcheck.sml
+++ b/src/scriptcheck.sml
@@ -114,6 +114,7 @@ fun classify (ds, ps) =
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