diff options
Diffstat (limited to 'src/mono.sml')
| -rw-r--r-- | src/mono.sml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/mono.sml b/src/mono.sml index f8f57ae7..9585fbc1 100644 --- a/src/mono.sml +++ b/src/mono.sml @@ -123,7 +123,9 @@ datatype exp' = withtype exp = exp' located -datatype policy = PolClient of exp +datatype policy = + PolClient of exp + | PolInsert of exp datatype decl' = DDatatype of (string * int * (string * int * typ option) list) list |