aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/source.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@csail.mit.edu>2017-07-12 16:23:51 -0400
committerGravatar Adam Chlipala <adamc@csail.mit.edu>2017-07-12 16:23:51 -0400
commit6d9522c001574db729262073cadb96c75f0f7c44 (patch)
tree2f3cb126d919b552b7cabefbc88be1abcbd45689 /src/source.sml
parent979ad6b8246e50d5c1f685afd0bd41ec0298696b (diff)
Allow inexhaustive patterns for lefthand sides of top-level 'val' declarations
Diffstat (limited to 'src/source.sml')
-rw-r--r--src/source.sml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/source.sml b/src/source.sml
index 9971ca93..2d8c1ed3 100644
--- a/src/source.sml
+++ b/src/source.sml
@@ -157,7 +157,7 @@ datatype decl' =
DCon of string * kind option * con
| DDatatype of (string * string list * (string * con option) list) list
| DDatatypeImp of string * string list * string
- | DVal of string * con option * exp
+ | DVal of pat * exp
| DValRec of (string * con option * exp) list
| DSgn of string * sgn
| DStr of string * sgn option * Time.time option * str * bool (* did this module come from the '-root' directive? *)