diff options
| author | peb <unknown> | 2005-04-12 09:49:44 +0000 |
|---|---|---|
| committer | peb <unknown> | 2005-04-12 09:49:44 +0000 |
| commit | fa6ba9a5318640778040e86268e9003216f3636e (patch) | |
| tree | fdbafb9713893bfb978d3c18f0fc7fc778bc763e /src/GF/Conversion/GFC.hs | |
| parent | 5f25c828178281ed8f8b77abc0b599d740c797b0 (diff) | |
"Committed_by_peb"
Diffstat (limited to 'src/GF/Conversion/GFC.hs')
| -rw-r--r-- | src/GF/Conversion/GFC.hs | 17 |
1 files changed, 8 insertions, 9 deletions
diff --git a/src/GF/Conversion/GFC.hs b/src/GF/Conversion/GFC.hs index 6a4adc253..5b5c4491e 100644 --- a/src/GF/Conversion/GFC.hs +++ b/src/GF/Conversion/GFC.hs @@ -4,37 +4,36 @@ -- Stability : (stable) -- Portability : (portable) -- --- > CVS $Date: 2005/04/11 13:52:48 $ +-- > CVS $Date: 2005/04/12 10:49:44 $ -- > CVS $Author: peb $ --- > CVS $Revision: 1.1 $ +-- > CVS $Revision: 1.2 $ -- -- All conversions from GFC ----------------------------------------------------------------------------- module GF.Conversion.GFC (module GF.Conversion.GFC, - SimpleGrammar, MGrammar, CGrammar) where + SGrammar, MGrammar, CGrammar) where import GFC (CanonGrammar) import Ident (Ident) -import GF.Formalism.SimpleGFC (SimpleGrammar) -import GF.Conversion.Types (CGrammar, MGrammar) +import GF.Conversion.Types (CGrammar, MGrammar, SGrammar) import qualified GF.Conversion.GFCtoSimple as G2S import qualified GF.Conversion.SimpleToFinite as S2Fin import qualified GF.Conversion.SimpleToMCFG as S2M import qualified GF.Conversion.MCFGtoCFG as M2C -gfc2simple :: (CanonGrammar, Ident) -> SimpleGrammar +gfc2simple :: (CanonGrammar, Ident) -> SGrammar gfc2simple = G2S.convertGrammar -simple2finite :: SimpleGrammar -> SimpleGrammar +simple2finite :: SGrammar -> SGrammar simple2finite = S2Fin.convertGrammar -simple2mcfg_nondet :: SimpleGrammar -> MGrammar +simple2mcfg_nondet :: SGrammar -> MGrammar simple2mcfg_nondet = S2M.convertGrammarNondet -simple2mcfg_strict :: SimpleGrammar -> MGrammar +simple2mcfg_strict :: SGrammar -> MGrammar simple2mcfg_strict = S2M.convertGrammarStrict mcfg2cfg :: MGrammar -> CGrammar |