From 80108924f99427180a2a2cfb486745311201ab71 Mon Sep 17 00:00:00 2001
From: bjorn <bjorn@bringert.net>
Date: Sun, 22 Jun 2008 12:01:29 +0000
Subject: [PATCH] Added SLF, RegExp and Dot printing to exportPGF.

---
 src-3.0/GF/Compile/Export.hs | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src-3.0/GF/Compile/Export.hs b/src-3.0/GF/Compile/Export.hs
index f88d6d7ba..9e9a99e99 100644
--- a/src-3.0/GF/Compile/Export.hs
+++ b/src-3.0/GF/Compile/Export.hs
@@ -13,6 +13,8 @@ import GF.Speech.SRGS_XML
 import GF.Speech.JSGF
 import GF.Speech.GSL
 import GF.Speech.VoiceXML
+import GF.Speech.SLF
+import GF.Speech.PrRegExp
 import GF.Text.UTF8
 
 import Data.Maybe
@@ -35,6 +37,9 @@ exportPGF opts fmt pgf =
       FmtJSGF         -> single "jsgf"  (jsgfPrinter sisr)
       FmtGSL          -> single "gsl"   gslPrinter
       FmtVoiceXML     -> single "vxml"  grammar2vxml
+      FmtSLF          -> single ".slf"  slfPrinter
+      FmtRegExp       -> single ".rexp" regexpPrinter
+      FmtFA           -> single ".dot"  slfGraphvizPrinter
  where
    name = fromMaybe (prCId (absname pgf)) (moduleFlag optName opts)
    sisr = flag optSISR opts