comparison src/mono.sml @ 1223:62af4cacd191

Update policies
author Adam Chlipala <adamc@hcoop.net>
date Sun, 11 Apr 2010 13:11:25 -0400
parents 00e628854005
children a2cd6664f57f
comparison
equal deleted inserted replaced
1222:117f13bdc1fd 1223:62af4cacd191
125 125
126 datatype policy = 126 datatype policy =
127 PolClient of exp 127 PolClient of exp
128 | PolInsert of exp 128 | PolInsert of exp
129 | PolDelete of exp 129 | PolDelete of exp
130 | PolUpdate of exp
130 131
131 datatype decl' = 132 datatype decl' =
132 DDatatype of (string * int * (string * int * typ option) list) list 133 DDatatype of (string * int * (string * int * typ option) list) list
133 | DVal of string * int * typ * exp * string 134 | DVal of string * int * typ * exp * string
134 | DValRec of (string * int * typ * exp * string) list 135 | DValRec of (string * int * typ * exp * string) list