diff options
| author | bjorn <bjorn@bringert.net> | 2008-09-26 15:21:32 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-09-26 15:21:32 +0000 |
| commit | ba321be3ffa503f7e65cbde4c3ff99bcfae57c3e (patch) | |
| tree | 9dec4bd14f2dc0b4c76d1be3b35d207f1e447021 /src/GF/Compile/Export.hs | |
| parent | 0f4e8468be45a8154098c44caa28cace147aa8ce (diff) | |
Added pgf-pretty output-format
Diffstat (limited to 'src/GF/Compile/Export.hs')
| -rw-r--r-- | src/GF/Compile/Export.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/GF/Compile/Export.hs b/src/GF/Compile/Export.hs index 23817b70f..f24e840c3 100644 --- a/src/GF/Compile/Export.hs +++ b/src/GF/Compile/Export.hs @@ -7,6 +7,7 @@ import PGF.Raw.Convert (fromPGF) import GF.Compile.GFCCtoHaskell import GF.Compile.GFCCtoProlog import GF.Compile.GFCCtoJS +import GF.Compile.PGFPretty import GF.Infra.Option import GF.Speech.CFG import GF.Speech.PGFToCFG @@ -32,6 +33,7 @@ exportPGF :: Options exportPGF opts fmt pgf = case fmt of FmtPGF -> multi "pgf" printPGF + FmtPGFPretty -> multi "txt" prPGFPretty FmtJavaScript -> multi "js" pgf2js FmtHaskell -> multi "hs" (grammar2haskell hsPrefix name) FmtHaskell_GADT -> multi "hs" (grammar2haskellGADT hsPrefix name) |