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

GF/src is now for 2.9, and the new sources are in src-3.0 - keep it this way until the release of GF 3

Browse Source
This commit is contained in:
aarne
2008-05-21 09:26:44 +00:00
parent 915a1de717
commit 055c0d0d5a
536 changed files with 0 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
src-3.0/GF/Devel/PrintGFCC.hs Normal file
View File

@@ -0,0 +1,21 @@
module GF.Devel.PrintGFCC where
import GF.GFCC.DataGFCC (GFCC)
import GF.GFCC.Raw.ConvertGFCC (fromGFCC)
import GF.GFCC.Raw.PrintGFCCRaw (printTree)
import GF.Devel.GFCCtoHaskell
import GF.Devel.GFCCtoJS
import GF.Text.UTF8
-- top-level access to code generation
prGFCC :: String -> GFCC -> String
prGFCC printer gr = case printer of
"haskell" -> grammar2haskell gr
"haskell_gadt" -> grammar2haskellGADT gr
"js" -> gfcc2js gr
_ -> printGFCC gr
printGFCC :: GFCC -> String
printGFCC = encodeUTF8 . printTree . fromGFCC