comparison src/cjr.sml @ 1073:b2311dfb3158

Initializers and setval
author Adam Chlipala <adamc@hcoop.net>
date Sun, 13 Dec 2009 14:20:41 -0500
parents 217eb87dde31
children 0657e5adc938
comparison
equal deleted inserted replaced
1072:9001966ae1c8 1073:b2311dfb3158
93 prepared : {id : int, query : string, nested : bool} option } 93 prepared : {id : int, query : string, nested : bool} option }
94 | EDml of { dml : exp, 94 | EDml of { dml : exp,
95 prepared : {id : int, dml : string} option } 95 prepared : {id : int, dml : string} option }
96 | ENextval of { seq : exp, 96 | ENextval of { seq : exp,
97 prepared : {id : int, query : string} option } 97 prepared : {id : int, query : string} option }
98 | ESetval of { seq : exp, count : exp }
98 | EUnurlify of exp * typ 99 | EUnurlify of exp * typ
99 100
100 withtype exp = exp' located 101 withtype exp = exp' located
101 102
102 datatype decl' = 103 datatype decl' =
115 116
116 | DJavaScript of string 117 | DJavaScript of string
117 | DCookie of string 118 | DCookie of string
118 | DStyle of string 119 | DStyle of string
119 120
121 | DInitializer of exp
122
120 withtype decl = decl' located 123 withtype decl = decl' located
121 124
122 datatype sidedness = 125 datatype sidedness =
123 ServerOnly 126 ServerOnly
124 | ServerAndPull 127 | ServerAndPull