From fa07ada6ab11f8e0820fe075ce58d8ca700e13e3 Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Fri, 16 Apr 2004 15:21:56 +0000
Subject: added srg; extended shallow

---
 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 bd1ed49e1..166f918ae 100644
--- a/src/GF/UseGrammar/Custom.hs
+++ b/src/GF/UseGrammar/Custom.hs
@@ -24,6 +24,7 @@ import PPrCF
 import PrLBNF
 import PrGrammar
 import MkGFC
+import CFtoSRG
 
 import Zipper
 
@@ -145,6 +146,7 @@ customGrammarPrinter =
   [
    (strCI "gfc",     prCanon . stateGrammarST) -- DEFAULT
   ,(strCI "cf",      prCF . stateCF)
+  ,(strCI "srg",     prSRG . stateCF)
   ,(strCI "lbnf",    prLBNF . stateCF)
   ,(strCI "morpho",  prMorpho . stateMorpho)
   ,(strCI "fullform",prFullForm . stateMorpho)
-- 
cgit v1.2.3