diff options
Diffstat (limited to 'src/elab.sml')
| -rw-r--r-- | src/elab.sml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/elab.sml b/src/elab.sml index de2db500..76ea6725 100644 --- a/src/elab.sml +++ b/src/elab.sml @@ -120,10 +120,10 @@ datatype exp' = | EError | EUnif of exp option ref - | ELet of edecl list * exp + | ELet of edecl list * exp * con and edecl' = - EDVal of string * con * exp + EDVal of pat * con * exp | EDValRec of (string * con * exp) list withtype exp = exp' located |