diff options
| author | peb <peb@cs.chalmers.se> | 2006-06-07 16:06:49 +0000 |
|---|---|---|
| committer | peb <peb@cs.chalmers.se> | 2006-06-07 16:06:49 +0000 |
| commit | 4009b46358fe3cc463c1e34c047958a15015941b (patch) | |
| tree | 5702c7744f0df0015721f20297a9609280dce64d /src/GF/UseGrammar/Custom.hs | |
| parent | 4a3d280df50a059f75f9c61a5afd932add789341 (diff) | |
new conversion MCFG -> FCFG, new grammar printers for FCFG
Diffstat (limited to 'src/GF/UseGrammar/Custom.hs')
| -rw-r--r-- | src/GF/UseGrammar/Custom.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/GF/UseGrammar/Custom.hs b/src/GF/UseGrammar/Custom.hs index 8c43a0696..4314747bf 100644 --- a/src/GF/UseGrammar/Custom.hs +++ b/src/GF/UseGrammar/Custom.hs @@ -309,6 +309,7 @@ customGrammarPrinter = -- grammar conversions: ,(strCI "mcfg", \_ -> Prt.prt . stateMCFG) ,(strCI "fcfg", \_ -> Prt.prt . stateFCFG) + ,(strCI "mcfg2fcfg",\_ -> Prt.prt . Cnv.mcfg2fcfg . stateMCFG) ,(strCI "cfg", \_ -> Prt.prt . stateCFG) ,(strCI "pinfo", \_ -> Prt.prt . statePInfo) ,(strCI "abstract", \_ -> Prt.prtAfter "\n" . Cnv.gfc2abstract . stateGrammarLang) |