summaryrefslogtreecommitdiff
path: root/src/cjr.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-09-14 11:02:18 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-09-14 11:02:18 -0400
commitc81c24b4feb3fae3c13861f1bcaafab697a6bb7e (patch)
tree4f168489261d0202a9d664e548dd71a10665df46 /src/cjr.sml
parent0faed8b64498534297bd797108b659802815aefc (diff)
SQL sequences
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 9b6765dc..8dca6b46 100644
--- a/src/cjr.sml
+++ b/src/cjr.sml
@@ -87,6 +87,8 @@ datatype exp' =
prepared : int option }
| EDml of { dml : exp,
prepared : int option }
+ | ENextval of { seq : exp,
+ prepared : int option }
withtype exp = exp' located
@@ -99,6 +101,7 @@ datatype decl' =
| DFunRec of (string * int * (string * typ) list * typ * exp) list
| DTable of string * (string * typ) list
+ | DSequence of string
| DDatabase of string
| DPreparedStatements of (string * int) list