summaryrefslogtreecommitdiff
path: root/src/cjr.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/cjr.sml')
-rw-r--r--src/cjr.sml3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/cjr.sml b/src/cjr.sml
index 2b8ce6fe..9be54670 100644
--- a/src/cjr.sml
+++ b/src/cjr.sml
@@ -95,6 +95,7 @@ datatype exp' =
prepared : {id : int, dml : string} option }
| ENextval of { seq : exp,
prepared : {id : int, query : string} option }
+ | ESetval of { seq : exp, count : exp }
| EUnurlify of exp * typ
withtype exp = exp' located
@@ -117,6 +118,8 @@ datatype decl' =
| DCookie of string
| DStyle of string
+ | DInitializer of exp
+
withtype decl = decl' located
datatype sidedness =