remove some redundant dependencies from FCFG

This commit is contained in:
kr.angelov
2007-09-23 20:01:25 +00:00
parent 0285771c41
commit 9efddd16ce
12 changed files with 13 additions and 35 deletions

View File

@@ -9,11 +9,8 @@
module GF.Parsing.FCFG.PInfo where
import GF.System.Tracing
import GF.Infra.PrintClass
import GF.Formalism.Utilities
import GF.Formalism.GCFG
import GF.Formalism.FCFG
import GF.Data.SortedList
import GF.Data.Assoc
@@ -73,8 +70,6 @@ getLeftCornerCat lins
buildFCFPInfo :: (Ord c, Ord n, Ord t) => (t -> (c,SyntaxNode RuleId RangeRec)) -> FCFGrammar c n t -> FCFPInfo c n t
buildFCFPInfo lexer grammar =
traceCalcFirst grammar $
tracePrt "MCFG.PInfo - parser info" (prt) $
FCFPInfo { allRules = allrules
, topdownRules = topdownrules
-- , emptyRules = emptyrules