summaryrefslogtreecommitdiff
path: root/src/GF/Canon/GFCC/AbsGFCC.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Canon/GFCC/AbsGFCC.hs')
-rw-r--r--src/GF/Canon/GFCC/AbsGFCC.hs15
1 files changed, 5 insertions, 10 deletions
diff --git a/src/GF/Canon/GFCC/AbsGFCC.hs b/src/GF/Canon/GFCC/AbsGFCC.hs
index af9f18088..ccb964689 100644
--- a/src/GF/Canon/GFCC/AbsGFCC.hs
+++ b/src/GF/Canon/GFCC/AbsGFCC.hs
@@ -47,24 +47,19 @@ data Term =
R [Term]
| P Term Term
| S [Term]
- | K Tokn
- | V Integer
- | C Integer
+ | KS String
+ | KP [String] [Variant]
+ | V Int
+ | C Int
| F CId
| FV [Term]
- | W String Term
+ | W String [String]
| RP Term Term
| TM
| L CId Term
| BV CId
deriving (Eq,Ord,Show)
-data Tokn =
- KS String
- | KP [String] [Variant]
- deriving (Eq,Ord,Show)
-
data Variant =
Var [String] [String]
deriving (Eq,Ord,Show)
-