diff options
Diffstat (limited to 'src-3.0/GF/Compile/Export.hs')
| -rw-r--r-- | src-3.0/GF/Compile/Export.hs | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src-3.0/GF/Compile/Export.hs b/src-3.0/GF/Compile/Export.hs index 2b36b10a9..ab5dcb393 100644 --- a/src-3.0/GF/Compile/Export.hs +++ b/src-3.0/GF/Compile/Export.hs @@ -1,8 +1,8 @@ module GF.Compile.Export where -import PGF.Data (GFCC) +import PGF.Data (PGF) import PGF.Raw.Print (printTree) -import PGF.Raw.Convert (fromGFCC) +import PGF.Raw.Convert (fromPGF) import GF.Compile.GFCCtoHaskell import GF.Compile.GFCCtoJS import GF.Infra.Option @@ -10,13 +10,13 @@ import GF.Text.UTF8 -- top-level access to code generation -prGFCC :: OutputFormat -> GFCC -> String -prGFCC fmt gr = case fmt of - FmtGFCC -> printGFCC gr - FmtJavaScript -> gfcc2js gr +prPGF :: OutputFormat -> PGF -> String +prPGF fmt gr = case fmt of + FmtPGF -> printPGF gr + FmtJavaScript -> pgf2js gr FmtHaskell -> grammar2haskell gr FmtHaskellGADT -> grammar2haskellGADT gr -printGFCC :: GFCC -> String -printGFCC = encodeUTF8 . printTree . fromGFCC +printPGF :: PGF -> String +printPGF = encodeUTF8 . printTree . fromPGF |