Use makeSimpleSRG everywhere and remove makeSRG. Reimplemented top-down filtering in terms of CFRules instead of SRG. Do top-down filtering in makeSimpleSRG.

This commit is contained in:
bringert
2007-03-19 18:03:19 +00:00
parent f0415dd0bc
commit 205f79efc6
4 changed files with 20 additions and 33 deletions

View File

@@ -32,7 +32,7 @@ import GF.Compile.ShellState (StateGrammar)
import Data.Char (toUpper,toLower)
gslPrinter :: Options -> StateGrammar -> String
gslPrinter opts s = prGSL $ topDownFilter $ makeSimpleSRG opts s
gslPrinter opts s = prGSL $ makeSimpleSRG opts s
prGSL :: SRG -> String
prGSL (SRG{grammarName=name,startCat=start,origStartCat=origStart,rules=rs})