diff options
Diffstat (limited to 'src/compiler/GF/Grammar/Grammar.hs')
| -rw-r--r-- | src/compiler/GF/Grammar/Grammar.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/compiler/GF/Grammar/Grammar.hs b/src/compiler/GF/Grammar/Grammar.hs index 3a6d4c25f..218a2bd0b 100644 --- a/src/compiler/GF/Grammar/Grammar.hs +++ b/src/compiler/GF/Grammar/Grammar.hs @@ -36,7 +36,7 @@ module GF.Grammar.Grammar ( PMCFG(..), Production(..), FId, FunId, SeqId, LIndex, Sequence, Info(..), - Location(..), L(..), unLoc, + Location(..), L(..), unLoc, noLoc, Type, Cat, Fun, @@ -372,6 +372,8 @@ instance Functor L where unLoc :: L a -> a unLoc (L _ x) = x +noLoc = L NoLoc + type Type = Term type Cat = QIdent type Fun = QIdent |