From cf22bd094f2cdbd18de166d9d24b8cf9a30c87b9 Mon Sep 17 00:00:00 2001 From: krasimir Date: Tue, 12 Jan 2010 14:36:41 +0000 Subject: move the definitions of _B and _V to PGF.Macros --- src/compiler/GF/Compile/GeneratePMCFG.hs | 3 --- 1 file changed, 3 deletions(-) (limited to 'src/compiler/GF') diff --git a/src/compiler/GF/Compile/GeneratePMCFG.hs b/src/compiler/GF/Compile/GeneratePMCFG.hs index 8b815008e..bad72f469 100644 --- a/src/compiler/GF/Compile/GeneratePMCFG.hs +++ b/src/compiler/GF/Compile/GeneratePMCFG.hs @@ -431,9 +431,6 @@ expandHOAS abs_defs cnc_defs lincats lindefs env = Nothing -> error $ "No lincat for " ++ showCId cat Just ctype -> ctype - _B = mkCId "_B" - _V = mkCId "_V" - addProduction :: GrammarEnv -> FCat -> Production -> GrammarEnv addProduction (GrammarEnv last_id catSet seqSet funSet crcSet prodSet) cat p = GrammarEnv last_id catSet seqSet funSet crcSet (IntMap.insertWith Set.union cat (Set.singleton p) prodSet) -- cgit v1.2.3