summaryrefslogtreecommitdiff
path: root/src/GF/CFGM/AbsCFG.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/CFGM/AbsCFG.hs')
-rw-r--r--src/GF/CFGM/AbsCFG.hs12
1 files changed, 6 insertions, 6 deletions
diff --git a/src/GF/CFGM/AbsCFG.hs b/src/GF/CFGM/AbsCFG.hs
index d66289ae9..c605ce212 100644
--- a/src/GF/CFGM/AbsCFG.hs
+++ b/src/GF/CFGM/AbsCFG.hs
@@ -1,4 +1,3 @@
-
module AbsCFG where
-- Haskell module generated by the BNF converter
@@ -18,7 +17,12 @@ data Flag =
deriving (Eq,Ord,Show)
data Rule =
- Rule Ident Name Profile Category [Symbol]
+ Rule Fun Profile Category [Symbol]
+ deriving (Eq,Ord,Show)
+
+data Fun =
+ Cons Ident
+ | Coerce
deriving (Eq,Ord,Show)
data Profile =
@@ -34,10 +38,6 @@ data Symbol =
| TermS String
deriving (Eq,Ord,Show)
-data Name =
- Name SingleQuoteString
- deriving (Eq,Ord,Show)
-
data Category =
Category SingleQuoteString
deriving (Eq,Ord,Show)