aboutsummaryrefslogtreecommitdiff
path: root/frontend
diff options
context:
space:
mode:
Diffstat (limited to 'frontend')
-rw-r--r--frontend/parse.icl5
1 files changed, 5 insertions, 0 deletions
diff --git a/frontend/parse.icl b/frontend/parse.icl
index 78c3780..6b1f4da 100644
--- a/frontend/parse.icl
+++ b/frontend/parse.icl
@@ -2483,6 +2483,9 @@ wantEndRootExpression pState=:{ps_skipping}
BarToken -> tokenBack pState
InToken -> tokenBack pState
CloseToken -> tokenBack pState
+ SquareCloseToken -> tokenBack pState
+ CommaToken -> tokenBack pState
+ ColonToken -> tokenBack pState
(SeqLetToken _) -> tokenBack pState
SemicolonToken # (token, pState) = nextToken FunctionContext pState
-> case token of
@@ -2587,6 +2590,8 @@ wantEndCase pState
CloseToken -> tokenBack (appScanState dropOffsidePosition pState)
SquareCloseToken -> tokenBack (appScanState dropOffsidePosition pState)
SemicolonToken -> tokenBack (appScanState dropOffsidePosition pState)
+ CommaToken -> tokenBack (appScanState dropOffsidePosition pState)
+ ColonToken -> tokenBack (appScanState dropOffsidePosition pState)
_ -> parseError "case expression" (Yes token) "end of case with layout" pState
// ~ ss_useLayout
| token == CurlyCloseToken