mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-22 19:22:50 -06:00
gsl printer now figures out startcat from grammar flags
This commit is contained in:
@@ -27,7 +27,7 @@ import PrGrammar
|
||||
import PrOld
|
||||
import MkGFC
|
||||
import CFtoSRG
|
||||
import PrGSL (prGSL)
|
||||
import PrGSL (gslPrinter)
|
||||
|
||||
import Zipper
|
||||
|
||||
@@ -191,7 +191,7 @@ customGrammarPrinter =
|
||||
,(strCI "cf", prCF . stateCF)
|
||||
,(strCI "old", printGrammarOld . stateGrammarST)
|
||||
,(strCI "srg", prSRG . stateCF)
|
||||
,(strCI "gsl", prGSL . Cnv.cfg . statePInfo)
|
||||
,(strCI "gsl", \s -> gslPrinter (stateOptions s) $ Cnv.cfg $ statePInfo s)
|
||||
,(strCI "lbnf", prLBNF . stateCF)
|
||||
,(strCI "haskell", grammar2haskell . stateGrammarST)
|
||||
,(strCI "morpho", prMorpho . stateMorpho)
|
||||
|
||||
Reference in New Issue
Block a user