diff options
| author | bringert <bringert@cs.chalmers.se> | 2007-01-19 17:04:32 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2007-01-19 17:04:32 +0000 |
| commit | cae872e75ac34fa6d94dd1dadb2b90f0272d3735 (patch) | |
| tree | d6e7146a6322fc5bee774d2cce2ea6464ecfa407 /src/GF/UseGrammar/Custom.hs | |
| parent | 7e240a69c321b26c4f9d67924ae9c012b3c2e16d (diff) | |
Added SRGS ABNF generation.
Diffstat (limited to 'src/GF/UseGrammar/Custom.hs')
| -rw-r--r-- | src/GF/UseGrammar/Custom.hs | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/src/GF/UseGrammar/Custom.hs b/src/GF/UseGrammar/Custom.hs index ca2b704b6..9ae9cd04a 100644 --- a/src/GF/UseGrammar/Custom.hs +++ b/src/GF/UseGrammar/Custom.hs @@ -61,7 +61,8 @@ import GF.Canon.MkGFC import GF.CF.CFtoSRG import GF.Speech.PrGSL (gslPrinter) import GF.Speech.PrJSGF (jsgfPrinter) -import qualified GF.Speech.PrSRGS as SRGS +import GF.Speech.PrSRGS +import GF.Speech.PrSRGS_ABNF import qualified GF.Speech.SISR as SISR import GF.Speech.PrSLF import GF.Speech.PrFA (faGraphvizPrinter,regularPrinter,faCPrinter) @@ -251,9 +252,11 @@ customGrammarPrinter = ,(strCI "gsl", gslPrinter) ,(strCI "jsgf", jsgfPrinter Nothing) ,(strCI "jsgf_sisr_old", jsgfPrinter (Just SISR.SISROld)) - ,(strCI "srgs_xml", SRGS.srgsXmlPrinter Nothing False) - ,(strCI "srgs_xml_prob", SRGS.srgsXmlPrinter Nothing True) - ,(strCI "srgs_xml_sisr_old", SRGS.srgsXmlPrinter (Just SISR.SISROld) False) + ,(strCI "srgs_xml", srgsXmlPrinter Nothing False) + ,(strCI "srgs_xml_prob", srgsXmlPrinter Nothing True) + ,(strCI "srgs_xml_sisr_old", srgsXmlPrinter (Just SISR.SISROld) False) + ,(strCI "srgs_abnf", srgsAbnfPrinter Nothing False) + ,(strCI "srgs_abnf_sisr_old", srgsAbnfPrinter (Just SISR.SISROld) False) ,(strCI "vxml", grammar2vxml) ,(strCI "slf", slfPrinter) ,(strCI "slf_graphviz", slfGraphvizPrinter) |