mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
Removed tracing from PrJSGF.
This commit is contained in:
@@ -46,7 +46,7 @@ jsgfPrinter name start opts sisr probs cfg = prJSGF srg sisr ""
|
||||
|
||||
prJSGF :: SRG -> Maybe SISRFormat -> ShowS
|
||||
prJSGF srg@(SRG{grammarName=name,startCat=start,origStartCat=origStart,rules=rs}) sisr
|
||||
= trace (show srg) $ header . nl
|
||||
= header . nl
|
||||
. mainCat . nl
|
||||
. unlinesS topCatRules . nl
|
||||
. unlinesS (map prRule rs)
|
||||
|
||||
Reference in New Issue
Block a user