diff options
Diffstat (limited to 'src/cjr.sml')
| -rw-r--r-- | src/cjr.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/cjr.sml b/src/cjr.sml index 6728e5c8..2b81de1a 100644 --- a/src/cjr.sml +++ b/src/cjr.sml @@ -100,7 +100,7 @@ withtype exp = exp' located datatype decl' = DStruct of int * (string * typ) list - | DDatatype of datatype_kind * string * int * (string * int * typ option) list + | DDatatype of (datatype_kind * string * int * (string * int * typ option) list) list | DDatatypeForward of datatype_kind * string * int | DVal of string * int * typ * exp | DFun of string * int * (string * typ) list * typ * exp |