diff src/mono.sml @ 1281:60e19545841b

equalAny policies
author Adam Chlipala <adam@chlipala.net>
date Tue, 27 Jul 2010 12:12:08 -0400
parents 3d06e0f7a6f3
children a9a500d22ebc
line wrap: on
line diff
--- a/src/mono.sml	Tue Jul 27 11:42:30 2010 -0400
+++ b/src/mono.sml	Tue Jul 27 12:12:08 2010 -0400
@@ -129,7 +129,7 @@
        | PolDelete of exp
        | PolUpdate of exp
        | PolSequence of exp
-       | PolEqualKnown of {table : exp, field : string}
+       | PolEqual of {table : exp, field : string, known : bool}
 
 datatype decl' =
          DDatatype of (string * int * (string * int * typ option) list) list