pattern matching for "x"*

2026-05-04 08:42:50 -06:00 · 2021-09-29 14:57:18 +02:00
parent edd7081dea
commit 6efb878c43
11 changed files with 44 additions and 19 deletions
--- a/src/compiler/GF/Grammar/Parser.y
+++ b/src/compiler/GF/Grammar/Parser.y
@@ -492,7 +492,7 @@ Patt1 :: { Patt }
 Patt1
  : Ident ListPatt            { PC $1 $2 } 
  | ModuleName '.' Ident ListPatt  { PP ($1,$3) $4 }
-  | Patt3 '*'                 { PRep $1 }
+  | Patt3 '*'                 { PRep 0 maxBound $1 }
  | Patt2                     { $1 }

 Patt2 :: { Patt }