diff options
Diffstat (limited to 'src/GF/Source/SkelGF.hs')
| -rw-r--r-- | src/GF/Source/SkelGF.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/GF/Source/SkelGF.hs b/src/GF/Source/SkelGF.hs index 93eac6922..544473533 100644 --- a/src/GF/Source/SkelGF.hs +++ b/src/GF/Source/SkelGF.hs @@ -66,7 +66,7 @@ transModBody x = case x of transExtend :: Extend -> Result transExtend x = case x of - Ext id -> failure x + Ext ids -> failure x NoExt -> failure x @@ -114,6 +114,7 @@ transTopDef :: TopDef -> Result transTopDef x = case x of DefCat catdefs -> failure x DefFun fundefs -> failure x + DefFunData fundefs -> failure x DefDef defs -> failure x DefData datadefs -> failure x DefTrans defs -> failure x @@ -193,6 +194,7 @@ transExp x = case x of EInt n -> failure x EMeta -> failure x EEmpty -> failure x + EData -> failure x EStrings str -> failure x ERecord locdefs -> failure x ETuple tuplecomps -> failure x |