GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-06 09:42:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

Added options to support SRG printing.

Browse Source
This commit is contained in:
bjorn
2008-06-03 19:20:18 +00:00
parent 61ccd948d3
commit 2ee8ab8a71
3 changed files with 42 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src-3.0/GFC.hs
View File

@@ -41,10 +41,11 @@ outputFilePath opts fmt name0 = addDir name <.> fmtExtension fmt
addDir = maybe id (</>) (flag optOutputDir opts)
fmtExtension :: OutputFormat -> String
fmtExtension FmtPGF = "pgf"
fmtExtension FmtJavaScript = "js"
fmtExtension FmtHaskell = "hs"
fmtExtension FmtHaskellGADT = "hs"
fmtExtension FmtPGF = "pgf"
fmtExtension FmtJavaScript = "js"
fmtExtension FmtHaskell = "hs"
fmtExtension FmtHaskell_GADT = "hs"
fmtExtension FmtSRGS_XML = "grxml"
writeOutputFile :: FilePath -> String -> IOE ()
writeOutputFile outfile output = ioeIO $