Generalized Speech Recognition Grammar generation. Added JSGF grammar printer.

This commit is contained in:
bringert
2004-10-01 08:43:59 +00:00
parent f7e066c8fa
commit 12e4aecffe
4 changed files with 212 additions and 101 deletions

View File

@@ -28,6 +28,7 @@ import PrOld
import MkGFC
import CFtoSRG
import PrGSL (gslPrinter)
import PrJSGF (jsgfPrinter)
import Zipper
@@ -194,6 +195,9 @@ customGrammarPrinter =
,(strCI "gsl", \s -> let opts = stateOptions s
name = cncId s
in gslPrinter name opts $ Cnv.cfg $ statePInfo s)
,(strCI "jsgf", \s -> let opts = stateOptions s
name = cncId s
in jsgfPrinter name opts $ Cnv.cfg $ statePInfo s)
,(strCI "plbnf", prLBNF True)
,(strCI "lbnf", prLBNF False)
,(strCI "bnf", prBNF False)