msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

"Committed_by_peb"

Browse Source
This commit is contained in:
peb
2005-03-21 21:31:43 +00:00
parent 08d1751cd6
commit 9be3569798
21 changed files with 1766 additions and 71 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/GF/Parsing/ParseMCFG.hs
View File

@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date: 2005/03/21 14:17:43 $
-- > CVS $Date: 2005/03/21 22:31:52 $
-- > CVS $Author: peb $
-- > CVS $Revision: 1.1 $
-- > CVS $Revision: 1.2 $
--
-- Main module for MCFG parsing
-----------------------------------------------------------------------------
@@ -16,9 +16,9 @@
module GF.Parsing.ParseMCFG (parse) where
import Char (toLower)
import GF.Parsing.Parser
import GF.Conversion.MCFGrammar
import qualified GF.Parsing.MCFParserBasic as PBas
import GF.Parsing.Utilities
import GF.Parsing.MCFGrammar
import qualified GF.Parsing.ParseMCFG.Basic as PBas
import GF.Printing.PrintParser
---- import qualified MCFParserBasic2 as PBas2 -- file not found AR
@@ -30,7 +30,7 @@ parse str = decodeParser (map toLower str)
decodeParser "b" = PBas.parse
---- decodeParser "c" = PBas2.parse
decodeParser _ = decodeParser "c"
decodeParser _ = decodeParser "b"