From 87eec27336bd9c2f123cffe56a67cc919c8da09b Mon Sep 17 00:00:00 2001
From: bringert <unknown>
Date: Tue, 14 Sep 2004 08:36:57 +0000
Subject: Added GSL speech recognition grammar generation.

---
 src/GF/UseGrammar/Custom.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/GF/UseGrammar/Custom.hs')

diff --git a/src/GF/UseGrammar/Custom.hs b/src/GF/UseGrammar/Custom.hs
index 9df79e983..4fd12f12a 100644
--- a/src/GF/UseGrammar/Custom.hs
+++ b/src/GF/UseGrammar/Custom.hs
@@ -27,6 +27,7 @@ import PrGrammar
 import PrOld
 import MkGFC
 import CFtoSRG
+import PrGSL (prGSL)
 
 import Zipper
 
@@ -190,6 +191,7 @@ customGrammarPrinter =
   ,(strCI "cf",      prCF . stateCF)
   ,(strCI "old",     printGrammarOld . stateGrammarST)
   ,(strCI "srg",     prSRG . stateCF)
+  ,(strCI "gsl",     prGSL . Cnv.cfg . statePInfo)
   ,(strCI "lbnf",    prLBNF . stateCF)
   ,(strCI "haskell", grammar2haskell . stateGrammarST)
   ,(strCI "morpho",  prMorpho . stateMorpho)
-- 
cgit v1.2.3