Mercurial > urweb
comparison src/elab.sml @ 1199:c316ca3c9ec6
Pushing policies through
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 04 Apr 2010 12:29:34 -0400 |
parents | 0657e5adc938 |
children | b4480a56cab7 |
comparison
equal
deleted
inserted
replaced
1197:6d8e3dcb9713 | 1199:c316ca3c9ec6 |
---|---|
169 | DClass of string * int * kind * con | 169 | DClass of string * int * kind * con |
170 | DDatabase of string | 170 | DDatabase of string |
171 | DCookie of int * string * int * con | 171 | DCookie of int * string * int * con |
172 | DStyle of int * string * int | 172 | DStyle of int * string * int |
173 | DTask of exp * exp | 173 | DTask of exp * exp |
174 | DPolicy of exp | |
174 | 175 |
175 and str' = | 176 and str' = |
176 StrConst of decl list | 177 StrConst of decl list |
177 | StrVar of int | 178 | StrVar of int |
178 | StrProj of str * string | 179 | StrProj of str * string |