diff options
Diffstat (limited to 'src/GF/GFCC/Macros.hs')
| -rw-r--r-- | src/GF/GFCC/Macros.hs | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/GF/GFCC/Macros.hs b/src/GF/GFCC/Macros.hs index dd9d594d6..29d1f6947 100644 --- a/src/GF/GFCC/Macros.hs +++ b/src/GF/GFCC/Macros.hs @@ -1,8 +1,8 @@ module GF.GFCC.Macros where -import GF.GFCC.AbsGFCC +import GF.GFCC.Raw.AbsGFCCRaw (CId (..)) import GF.GFCC.DataGFCC -import GF.GFCC.PrintGFCC +----import GF.GFCC.PrintGFCC import Data.Map import Data.List @@ -83,9 +83,6 @@ term0 _ = TM kks :: String -> Term kks = K . KS -prt :: Print a => a -> String -prt = printTree - -- lookup with default value lookMap :: (Show i, Ord i) => a -> i -> Map i a -> a lookMap d c m = maybe d id $ Data.Map.lookup c m |