GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-24 03:52:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

Removed tracing from PrJSGF.

Browse Source
This commit is contained in:
bringert
2006-12-20 20:14:46 +00:00
parent cb70ffadaa
commit 8424b23765
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Speech/PrJSGF.hs
View File

@@ -46,7 +46,7 @@ jsgfPrinter name start opts sisr probs cfg = prJSGF srg sisr ""
prJSGF :: SRG -> Maybe SISRFormat -> ShowS prJSGF :: SRG -> Maybe SISRFormat -> ShowS
prJSGF srg@(SRG{grammarName=name,startCat=start,origStartCat=origStart,rules=rs}) sisr prJSGF srg@(SRG{grammarName=name,startCat=start,origStartCat=origStart,rules=rs}) sisr
= trace (show srg) $ header . nl = header . nl
. mainCat . nl . mainCat . nl
. unlinesS topCatRules . nl . unlinesS topCatRules . nl
. unlinesS (map prRule rs) . unlinesS (map prRule rs)