Removed tracing from PrJSGF.

This commit is contained in:
bringert
2006-12-20 20:14:46 +00:00
parent cb70ffadaa
commit 8424b23765

View File

@@ -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)