From 4e42d73ee508715e83c8f1a160b7bc696b78571b Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Sat, 7 Jan 2006 12:26:11 +0000
Subject: regex patterns for tokens

---
 src/GF/Source/GF.cf | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src/GF/Source/GF.cf')

diff --git a/src/GF/Source/GF.cf b/src/GF/Source/GF.cf
index cdfb59d25..a84d37d5b 100644
--- a/src/GF/Source/GF.cf
+++ b/src/GF/Source/GF.cf
@@ -200,7 +200,7 @@ EEqs.      Exp  ::= "fn" "{" [Equation] "}" ;
 
 EExample.  Exp  ::= "in" Exp5 String ;
 
-coercions Exp 4 ;
+coercions Exp 6 ;
 
 separator Exp ";" ; -- in variants
 
@@ -222,6 +222,9 @@ PTup.   Patt2  ::= "<" [PattTupleComp] ">" ;
 PC.     Patt1  ::= Ident [Patt] ;
 PQC.    Patt1  ::= Ident "." Ident [Patt] ;
 PDisj.  Patt   ::= Patt "|" Patt1 ;
+PSeq.   Patt   ::= Patt "+" Patt1 ;
+PRep.   Patt1  ::= Patt2 "*" ;
+PAs.    Patt1  ::= Ident "@" Patt2 ;
 
 coercions Patt 2 ;
 
-- 
cgit v1.2.3