aboutsummaryrefslogtreecommitdiff
path: root/snug-clean
diff options
context:
space:
mode:
Diffstat (limited to 'snug-clean')
-rw-r--r--snug-clean/src/Snug/Parse.icl2
1 files changed, 1 insertions, 1 deletions
diff --git a/snug-clean/src/Snug/Parse.icl b/snug-clean/src/Snug/Parse.icl
index 64331c5..9d58f23 100644
--- a/snug-clean/src/Snug/Parse.icl
+++ b/snug-clean/src/Snug/Parse.icl
@@ -42,7 +42,7 @@ where
(pToken (TIdent "fun") *> symbolIdent)
(simpleList (parenthesized typedArgument))
(pToken TColon *> type)
- simpleOrParenthesizedExpression
+ (pToken TColon *> expression)
simpleConstructorDef = liftM2 ConstructorDef constructorIdent (pure [])
constructorDef = liftM2 ConstructorDef constructorIdent (many simpleOrParenthesizedType)