GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-22 11:19:32 -06:00
Code Issues Packages Projects Releases Wiki Activity

Moved general XML stuff to GF.Data.XML. Started working on VoiceXML generation.

Browse Source
This commit is contained in:
bringert
2006-02-03 18:43:06 +00:00
parent ecc3c7144b
commit 07b34ff780
6 changed files with 252 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/UseGrammar/Custom.hs
View File

@@ -60,6 +60,7 @@ import GF.Speech.PrJSGF (jsgfPrinter)
import GF.Speech.PrSRGS (srgsXmlPrinter)
import GF.Speech.PrSLF
import GF.Speech.PrFA (faGraphvizPrinter,regularPrinter,faCPrinter)
import GF.Speech.GrammarToVoiceXML (grammar2vxml)
import GF.Data.Zipper
@@ -257,6 +258,7 @@ customGrammarPrinter =
,(strCI "srgs_xml_ms_sem", \s -> let opts = stateOptions s
name = cncId s
in srgsXmlPrinter name opts True Nothing $ stateCFG s)
,(strCI "vxml", grammar2vxml . stateGrammarST)
,(strCI "slf", \s -> let opts = stateOptions s
start = getStartCat opts
name = cncId s