From dbfb7c4f285fda49c59648ef16c6d6bfdd4e59bd Mon Sep 17 00:00:00 2001
From: Marvin Borner
Date: Fri, 4 Mar 2022 01:10:12 +0100
Subject: Syntax

---
 src/Fun/Grammar.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/Fun/Grammar.hs')

diff --git a/src/Fun/Grammar.hs b/src/Fun/Grammar.hs
index 7f6625d..422a211 100644
--- a/src/Fun/Grammar.hs
+++ b/src/Fun/Grammar.hs
@@ -119,6 +119,7 @@ functionPatternElement :: Parser FunctionPatternElement
 functionPatternElement =
   (functionParameter >>> FunctionPatternParameter)
     <|> (literal '_' >>> const FunctionPatternWildcard)
+    <|> (literal '_' <+-> literal '*' >>> const FunctionPatternSuperWildcard)
     <|> (number >>> FunctionPatternNumber)
     <|> (string >>> FunctionPatternString)
     <?> "function pattern element"
-- 
cgit v1.2.3