diff options
| author | krasimir <krasimir@chalmers.se> | 2008-05-30 11:15:33 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2008-05-30 11:15:33 +0000 |
| commit | 8bb0c32a9cf2cbad0375ab5886b7f2be37109477 (patch) | |
| tree | 2290b07d391a1da4e94ee367b445a6b2f64ca2cd /src-3.0/GF/Compile/Export.hs | |
| parent | 1172539a9544ed999c565053b79cf6a30ec14de4 (diff) | |
replace GFCC with PGF in (almost) all places
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 |