summaryrefslogtreecommitdiff
path: root/src/GF/Source/GF.cf
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Source/GF.cf')
-rw-r--r--src/GF/Source/GF.cf4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/GF/Source/GF.cf b/src/GF/Source/GF.cf
index 80da5b9d1..d6170a6e7 100644
--- a/src/GF/Source/GF.cf
+++ b/src/GF/Source/GF.cf
@@ -45,7 +45,7 @@ MUnion. ModBody ::= "union" [Included] ;
separator TopDef "" ;
-Ext. Extend ::= Ident "**" ;
+Ext. Extend ::= [Ident] "**" ;
NoExt. Extend ::= ;
separator Open "," ;
@@ -79,6 +79,7 @@ DFull. Def ::= [Ident] ":" Exp "=" Exp ;
DefCat. TopDef ::= "cat" [CatDef] ;
DefFun. TopDef ::= "fun" [FunDef] ;
+DefFunData.TopDef ::= "data" [FunDef] ;
DefDef. TopDef ::= "def" [Def] ;
DefData. TopDef ::= "data" [DataDef] ;
@@ -145,6 +146,7 @@ EString. Exp4 ::= String ;
EInt. Exp4 ::= Integer ;
EMeta. Exp4 ::= "?" ;
EEmpty. Exp4 ::= "[" "]" ;
+EData. Exp4 ::= "data" ;
EStrings. Exp4 ::= "[" String "]" ;
ERecord. Exp4 ::= "{" [LocDef] "}" ; -- !
ETuple. Exp4 ::= "<" [TupleComp] ">" ; --- needed for separator ","