summaryrefslogtreecommitdiff
path: root/src/GF/OldParsing
diff options
context:
space:
mode:
authorbringert <unknown>2005-04-21 15:21:02 +0000
committerbringert <unknown>2005-04-21 15:21:02 +0000
commit5c9917ff8d18ddaefd5a8bf4b223009747477fd8 (patch)
tree46345cb91a8e0fa626a0bf4c03af8f8ef4cad09f /src/GF/OldParsing
parent3433c978480f112bf04a895d03ec15529796ecce (diff)
Fixed module names and imports after giant file move.
Diffstat (limited to 'src/GF/OldParsing')
-rw-r--r--src/GF/OldParsing/CFGrammar.hs10
-rw-r--r--src/GF/OldParsing/ConvertFiniteGFC.hs16
-rw-r--r--src/GF/OldParsing/ConvertFiniteSimple.hs12
-rw-r--r--src/GF/OldParsing/ConvertGFCtoMCFG.hs12
-rw-r--r--src/GF/OldParsing/ConvertGFCtoMCFG/Coercions.hs10
-rw-r--r--src/GF/OldParsing/ConvertGFCtoMCFG/Nondet.hs26
-rw-r--r--src/GF/OldParsing/ConvertGFCtoMCFG/Old.hs30
-rw-r--r--src/GF/OldParsing/ConvertGFCtoMCFG/Strict.hs26
-rw-r--r--src/GF/OldParsing/ConvertGFCtoSimple.hs22
-rw-r--r--src/GF/OldParsing/ConvertGrammar.hs14
-rw-r--r--src/GF/OldParsing/ConvertMCFGtoCFG.hs8
-rw-r--r--src/GF/OldParsing/ConvertSimpleToMCFG/Coercions.hs10
-rw-r--r--src/GF/OldParsing/ConvertSimpleToMCFG/Nondet.hs18
-rw-r--r--src/GF/OldParsing/ConvertSimpleToMCFG/Old.hs32
-rw-r--r--src/GF/OldParsing/ConvertSimpleToMCFG/Strict.hs28
-rw-r--r--src/GF/OldParsing/GrammarTypes.hs10
-rw-r--r--src/GF/OldParsing/IncrementalChart.hs8
-rw-r--r--src/GF/OldParsing/MCFGrammar.hs8
-rw-r--r--src/GF/OldParsing/ParseCF.hs10
-rw-r--r--src/GF/OldParsing/ParseCFG.hs8
-rw-r--r--src/GF/OldParsing/ParseCFG/General.hs8
-rw-r--r--src/GF/OldParsing/ParseCFG/Incremental.hs12
-rw-r--r--src/GF/OldParsing/ParseGFC.hs26
-rw-r--r--src/GF/OldParsing/ParseMCFG.hs8
-rw-r--r--src/GF/OldParsing/ParseMCFG/Basic.hs10
-rw-r--r--src/GF/OldParsing/SimpleGFC.hs12
-rw-r--r--src/GF/OldParsing/Utilities.hs12
27 files changed, 203 insertions, 203 deletions
diff --git a/src/GF/OldParsing/CFGrammar.hs b/src/GF/OldParsing/CFGrammar.hs
index 6c6269626..5a71fe0ab 100644
--- a/src/GF/OldParsing/CFGrammar.hs
+++ b/src/GF/OldParsing/CFGrammar.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:52 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:41 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Definitions of context-free grammars,
-- parser information and chart conversion
@@ -30,11 +30,11 @@ module GF.OldParsing.CFGrammar
import GF.System.Tracing
-- haskell modules:
-import Array
+import Data.Array
-- gf modules:
import GF.Data.SortedList
import GF.Data.Assoc
-import qualified CF
+import qualified GF.CF.CF as CF
-- parser modules:
import GF.OldParsing.Utilities
import GF.Printing.PrintParser
diff --git a/src/GF/OldParsing/ConvertFiniteGFC.hs b/src/GF/OldParsing/ConvertFiniteGFC.hs
index 61486023e..25ed3fdb3 100644
--- a/src/GF/OldParsing/ConvertFiniteGFC.hs
+++ b/src/GF/OldParsing/ConvertFiniteGFC.hs
@@ -4,20 +4,20 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:52 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:42 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Calculating the finiteness of each type in a grammar
-----------------------------------------------------------------------------
module GF.OldParsing.ConvertFiniteGFC where
-import Operations
-import GFC
-import MkGFC
-import AbsGFC
-import Ident (Ident(..))
+import GF.Data.Operations
+import GF.Canon.GFC
+import GF.Canon.MkGFC
+import GF.Canon.AbsGFC
+import GF.Infra.Ident (Ident(..))
import GF.System.Tracing
import GF.Printing.PrintParser
import GF.Printing.PrintSimplifiedTerm
diff --git a/src/GF/OldParsing/ConvertFiniteSimple.hs b/src/GF/OldParsing/ConvertFiniteSimple.hs
index 7aac39cb2..a05092550 100644
--- a/src/GF/OldParsing/ConvertFiniteSimple.hs
+++ b/src/GF/OldParsing/ConvertFiniteSimple.hs
@@ -4,22 +4,22 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:52 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:43 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Calculating the finiteness of each type in a grammar
-----------------------------------------------------------------------------
-module GF.OldParsing.ConvertFiniteSimple
+module GF.OldParsing.ConvertFiniteSimple
(convertGrammar) where
import GF.System.Tracing
import GF.Printing.PrintParser
import GF.Printing.PrintSimplifiedTerm
-import Operations
-import Ident (Ident(..))
+import GF.Data.Operations
+import GF.Infra.Ident (Ident(..))
import GF.OldParsing.SimpleGFC
import GF.Data.SortedList
import GF.Data.Assoc
diff --git a/src/GF/OldParsing/ConvertGFCtoMCFG.hs b/src/GF/OldParsing/ConvertGFCtoMCFG.hs
index 1a9bc1a75..c32812eb2 100644
--- a/src/GF/OldParsing/ConvertGFCtoMCFG.hs
+++ b/src/GF/OldParsing/ConvertGFCtoMCFG.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:52 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:44 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- All different conversions from GFC to MCFG
-----------------------------------------------------------------------------
@@ -16,10 +16,10 @@
module GF.OldParsing.ConvertGFCtoMCFG
(convertGrammar) where
-import GFC (CanonGrammar)
+import GF.Canon.GFC (CanonGrammar)
import GF.OldParsing.GrammarTypes
-import Ident (Ident(..))
-import Option
+import GF.Infra.Ident (Ident(..))
+import GF.Infra.Option
import GF.System.Tracing
import qualified GF.OldParsing.ConvertGFCtoMCFG.Old as Old
diff --git a/src/GF/OldParsing/ConvertGFCtoMCFG/Coercions.hs b/src/GF/OldParsing/ConvertGFCtoMCFG/Coercions.hs
index 650f8b646..3ed6a3f48 100644
--- a/src/GF/OldParsing/ConvertGFCtoMCFG/Coercions.hs
+++ b/src/GF/OldParsing/ConvertGFCtoMCFG/Coercions.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:55 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:54 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Adding coercion functions to a MCFG if necessary.
-----------------------------------------------------------------------------
@@ -21,12 +21,12 @@ import GF.Printing.PrintSimplifiedTerm
-- import PrintGFC
-- import qualified PrGrammar as PG
-import qualified Ident
+import qualified GF.Infra.Ident as Ident
import GF.OldParsing.Utilities
import GF.OldParsing.GrammarTypes
import GF.OldParsing.MCFGrammar (Rule(..), Lin(..))
import GF.Data.SortedList
-import List (groupBy) -- , transpose)
+import Data.List (groupBy) -- , transpose)
----------------------------------------------------------------------
diff --git a/src/GF/OldParsing/ConvertGFCtoMCFG/Nondet.hs b/src/GF/OldParsing/ConvertGFCtoMCFG/Nondet.hs
index d27e240bc..ef9265d91 100644
--- a/src/GF/OldParsing/ConvertGFCtoMCFG/Nondet.hs
+++ b/src/GF/OldParsing/ConvertGFCtoMCFG/Nondet.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:55 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:55 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Converting GFC grammars to MCFG grammars, nondeterministically.
--
@@ -26,21 +26,21 @@ import GF.Printing.PrintSimplifiedTerm
-- import PrintGFC
-- import qualified PrGrammar as PG
-import Monad
-import Ident (Ident(..))
-import AbsGFC
-import GFC
-import Look
-import Operations
-import qualified Modules as M
-import CMacros (defLinType)
-import MkGFC (grammar2canon)
+import Control.Monad
+import GF.Infra.Ident (Ident(..))
+import GF.Canon.AbsGFC
+import GF.Canon.GFC
+import GF.Canon.Look
+import GF.Data.Operations
+import qualified GF.Infra.Modules as M
+import GF.Canon.CMacros (defLinType)
+import GF.Canon.MkGFC (grammar2canon)
import GF.OldParsing.Utilities
import GF.OldParsing.GrammarTypes
import GF.OldParsing.MCFGrammar (Grammar, Rule(..), Lin(..))
import GF.Data.SortedList
-- import Maybe (listToMaybe)
-import List (groupBy) -- , transpose)
+import Data.List (groupBy) -- , transpose)
import GF.Data.BacktrackM
diff --git a/src/GF/OldParsing/ConvertGFCtoMCFG/Old.hs b/src/GF/OldParsing/ConvertGFCtoMCFG/Old.hs
index d0869c8f5..b9fbf3b8c 100644
--- a/src/GF/OldParsing/ConvertGFCtoMCFG/Old.hs
+++ b/src/GF/OldParsing/ConvertGFCtoMCFG/Old.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:55 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:56 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Converting GFC grammars to MCFG grammars. (Old variant)
--
@@ -24,24 +24,24 @@ import GF.System.Tracing
import GF.Printing.PrintParser
import GF.Printing.PrintSimplifiedTerm
--import PrintGFC
-import qualified PrGrammar as PG
+import qualified GF.Grammar.PrGrammar as PG
-import Monad (liftM, liftM2, guard)
+import Control.Monad (liftM, liftM2, guard)
-- import Maybe (listToMaybe)
-import Ident (Ident(..))
-import AbsGFC
-import GFC
-import Look
-import Operations
-import qualified Modules as M
-import CMacros (defLinType)
-import MkGFC (grammar2canon)
+import GF.Infra.Ident (Ident(..))
+import GF.Canon.AbsGFC
+import GF.Canon.GFC
+import GF.Canon.Look
+import GF.Data.Operations
+import qualified GF.Infra.Modules as M
+import GF.Canon.CMacros (defLinType)
+import GF.Canon.MkGFC (grammar2canon)
import GF.OldParsing.Utilities
import GF.OldParsing.GrammarTypes
import GF.OldParsing.MCFGrammar (Rule(..), Lin(..))
import GF.Data.SortedList (nubsort, groupPairs)
-import Maybe (listToMaybe)
-import List (groupBy, transpose)
+import Data.Maybe (listToMaybe)
+import Data.List (groupBy, transpose)
----------------------------------------------------------------------
-- old style types
diff --git a/src/GF/OldParsing/ConvertGFCtoMCFG/Strict.hs b/src/GF/OldParsing/ConvertGFCtoMCFG/Strict.hs
index 604fb460b..d1e5c5b20 100644
--- a/src/GF/OldParsing/ConvertGFCtoMCFG/Strict.hs
+++ b/src/GF/OldParsing/ConvertGFCtoMCFG/Strict.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:56 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:56 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Converting GFC grammars to MCFG grammars, nondeterministically.
--
@@ -27,21 +27,21 @@ import GF.Printing.PrintSimplifiedTerm
-- import PrintGFC
-- import qualified PrGrammar as PG
-import Monad
-import Ident (Ident(..))
-import AbsGFC
-import GFC
-import Look
-import Operations
-import qualified Modules as M
-import CMacros (defLinType)
-import MkGFC (grammar2canon)
+import Control.Monad
+import GF.Infra.Ident (Ident(..))
+import GF.Canon.AbsGFC
+import GF.Canon.GFC
+import GF.Canon.Look
+import GF.Data.Operations
+import qualified GF.Infra.Modules as M
+import GF.Canon.CMacros (defLinType)
+import GF.Canon.MkGFC (grammar2canon)
import GF.OldParsing.Utilities
import GF.OldParsing.GrammarTypes
import GF.OldParsing.MCFGrammar (Grammar, Rule(..), Lin(..))
import GF.Data.SortedList
-- import Maybe (listToMaybe)
-import List (groupBy) -- , transpose)
+import Data.List (groupBy) -- , transpose)
import GF.Data.BacktrackM
diff --git a/src/GF/OldParsing/ConvertGFCtoSimple.hs b/src/GF/OldParsing/ConvertGFCtoSimple.hs
index a14fa90b6..343f1f056 100644
--- a/src/GF/OldParsing/ConvertGFCtoSimple.hs
+++ b/src/GF/OldParsing/ConvertGFCtoSimple.hs
@@ -4,9 +4,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:52 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:45 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Converting GFC to SimpleGFC
--
@@ -15,16 +15,16 @@
module GF.OldParsing.ConvertGFCtoSimple where
-import qualified AbsGFC as A
-import qualified Ident as I
+import qualified GF.Canon.AbsGFC as A
+import qualified GF.Infra.Ident as I
import GF.OldParsing.SimpleGFC
-import GFC
-import MkGFC (grammar2canon)
-import qualified Look (lookupLin, allParamValues, lookupLincat)
-import qualified CMacros (defLinType)
-import Operations (err, errVal)
-import qualified Modules as M
+import GF.Canon.GFC
+import GF.Canon.MkGFC (grammar2canon)
+import qualified GF.Canon.Look as Look (lookupLin, allParamValues, lookupLincat)
+import qualified GF.Canon.CMacros as CMacros (defLinType)
+import GF.Data.Operations (err, errVal)
+import qualified GF.Infra.Modules as M
import GF.System.Tracing
import GF.Printing.PrintParser
diff --git a/src/GF/OldParsing/ConvertGrammar.hs b/src/GF/OldParsing/ConvertGrammar.hs
index 474834081..0dcd90770 100644
--- a/src/GF/OldParsing/ConvertGrammar.hs
+++ b/src/GF/OldParsing/ConvertGrammar.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:52 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:45 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- All (?) grammar conversions which are used in GF
-----------------------------------------------------------------------------
@@ -18,11 +18,11 @@ module GF.OldParsing.ConvertGrammar
module GF.OldParsing.GrammarTypes
) where
-import GFC (CanonGrammar)
-import MkGFC (grammar2canon)
+import GF.Canon.GFC (CanonGrammar)
+import GF.Canon.MkGFC (grammar2canon)
import GF.OldParsing.GrammarTypes
-import Ident (Ident(..))
-import Option
+import GF.Infra.Ident (Ident(..))
+import GF.Infra.Option
import GF.System.Tracing
-- import qualified GF.OldParsing.FiniteTypes.Calc as Fin
diff --git a/src/GF/OldParsing/ConvertMCFGtoCFG.hs b/src/GF/OldParsing/ConvertMCFGtoCFG.hs
index 06965994c..58d141166 100644
--- a/src/GF/OldParsing/ConvertMCFGtoCFG.hs
+++ b/src/GF/OldParsing/ConvertMCFGtoCFG.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:53 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:46 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Converting MCFG grammars to (possibly overgenerating) CFG
-----------------------------------------------------------------------------
@@ -19,7 +19,7 @@ module GF.OldParsing.ConvertMCFGtoCFG
import GF.System.Tracing
import GF.Printing.PrintParser
-import Monad
+import Control.Monad
import GF.OldParsing.Utilities
import qualified GF.OldParsing.MCFGrammar as MCFG
import qualified GF.OldParsing.CFGrammar as CFG
diff --git a/src/GF/OldParsing/ConvertSimpleToMCFG/Coercions.hs b/src/GF/OldParsing/ConvertSimpleToMCFG/Coercions.hs
index 1c107356b..adc42115a 100644
--- a/src/GF/OldParsing/ConvertSimpleToMCFG/Coercions.hs
+++ b/src/GF/OldParsing/ConvertSimpleToMCFG/Coercions.hs
@@ -4,9 +4,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/16 05:40:50 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.2 $
+-- > CVS $Date: 2005/04/21 16:22:57 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.3 $
--
-- Adding coercion functions to a MCFG if necessary.
-----------------------------------------------------------------------------
@@ -20,12 +20,12 @@ import GF.Printing.PrintSimplifiedTerm
-- import PrintGFC
-- import qualified PrGrammar as PG
-import qualified Ident
+import qualified GF.Infra.Ident as Ident
import GF.OldParsing.Utilities
--import GF.OldParsing.GrammarTypes
import GF.OldParsing.MCFGrammar (Rule(..), Lin(..))
import GF.Data.SortedList
-import List (groupBy) -- , transpose)
+import Data.List (groupBy) -- , transpose)
----------------------------------------------------------------------
diff --git a/src/GF/OldParsing/ConvertSimpleToMCFG/Nondet.hs b/src/GF/OldParsing/ConvertSimpleToMCFG/Nondet.hs
index da7511eaf..6627c5f2e 100644
--- a/src/GF/OldParsing/ConvertSimpleToMCFG/Nondet.hs
+++ b/src/GF/OldParsing/ConvertSimpleToMCFG/Nondet.hs
@@ -4,9 +4,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:56 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:58 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Converting SimpleGFC grammars to MCFG grammars, nondeterministically.
--
@@ -24,14 +24,14 @@ import GF.Printing.PrintSimplifiedTerm
-- import PrintGFC
-- import qualified PrGrammar as PG
-import Monad
+import Control.Monad
-- import Ident (Ident(..))
-import qualified AbsGFC
+import qualified GF.Canon.AbsGFC as AbsGFC
-- import GFC
-import Look
-import Operations
+import GF.Canon.Look
+import GF.Data.Operations
-- import qualified Modules as M
-import CMacros (defLinType)
+import GF.Canon.CMacros (defLinType)
-- import MkGFC (grammar2canon)
import GF.OldParsing.Utilities
-- import GF.OldParsing.GrammarTypes
@@ -39,7 +39,7 @@ import GF.Data.SortedList
import qualified GF.OldParsing.MCFGrammar as MCF (Grammar, Rule(..), Lin(..))
import GF.OldParsing.SimpleGFC
-- import Maybe (listToMaybe)
-import List (groupBy) -- , transpose)
+import Data.List (groupBy) -- , transpose)
import GF.Data.BacktrackM
diff --git a/src/GF/OldParsing/ConvertSimpleToMCFG/Old.hs b/src/GF/OldParsing/ConvertSimpleToMCFG/Old.hs
index 88a459625..dd2ff0713 100644
--- a/src/GF/OldParsing/ConvertSimpleToMCFG/Old.hs
+++ b/src/GF/OldParsing/ConvertSimpleToMCFG/Old.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:56 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:59 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Converting GFC grammars to MCFG grammars. (Old variant)
--
@@ -18,30 +18,30 @@
-----------------------------------------------------------------------------
-module GF.OldParsing.ConvertGFCtoMCFG.Old (convertGrammar) where
+module GF.OldParsing.ConvertSimpleToMCFG.Old (convertGrammar) where
import GF.System.Tracing
import GF.Printing.PrintParser
import GF.Printing.PrintSimplifiedTerm
--import PrintGFC
-import qualified PrGrammar as PG
+import qualified GF.Grammar.PrGrammar as PG
-import Monad (liftM, liftM2, guard)
+import Control.Monad (liftM, liftM2, guard)
-- import Maybe (listToMaybe)
-import Ident (Ident(..))
-import AbsGFC
-import GFC
-import Look
-import Operations
-import qualified Modules as M
-import CMacros (defLinType)
-import MkGFC (grammar2canon)
+import GF.Infra.Ident (Ident(..))
+import GF.Canon.AbsGFC
+import GF.Canon.GFC
+import GF.Canon.Look
+import GF.Data.Operations
+import qualified GF.Infra.Modules as M
+import GF.Canon.CMacros (defLinType)
+import GF.Canon.MkGFC (grammar2canon)
import GF.OldParsing.Utilities
import GF.OldParsing.GrammarTypes
import GF.OldParsing.MCFGrammar (Rule(..), Lin(..))
import GF.Data.SortedList (nubsort, groupPairs)
-import Maybe (listToMaybe)
-import List (groupBy, transpose)
+import Data.Maybe (listToMaybe)
+import Data.List (groupBy, transpose)
----------------------------------------------------------------------
-- old style types
diff --git a/src/GF/OldParsing/ConvertSimpleToMCFG/Strict.hs b/src/GF/OldParsing/ConvertSimpleToMCFG/Strict.hs
index a1be8af4e..aa741518a 100644
--- a/src/GF/OldParsing/ConvertSimpleToMCFG/Strict.hs
+++ b/src/GF/OldParsing/ConvertSimpleToMCFG/Strict.hs
@@ -4,9 +4,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:56 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:23:00 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Converting SimpleGFC grammars to MCFG grammars, deterministic.
--
@@ -16,12 +16,12 @@
-----------------------------------------------------------------------------
-module GF.OldParsing.ConvertGFCtoMCFG.Strict (convertGrammar) where
+module GF.OldParsing.ConvertSimpleToMCFG.Strict (convertGrammar) where
import GF.System.Tracing
import GF.Infra.Print
-import Monad
+import Control.Monad
import GF.Formalism.Utilities
import GF.Formalism.GCFG
@@ -32,20 +32,20 @@ import GF.Conversion.Types
import GF.Data.BacktrackM
{-
-import Ident (Ident(..))
-import AbsGFC
-import GFC
-import Look
-import Operations
-import qualified Modules as M
-import CMacros (defLinType)
-import MkGFC (grammar2canon)
+import GF.Infra.Ident (Ident(..))
+import GF.Canon.AbsGFC
+import GF.Canon.GFC
+import GF.Canon.Look
+import GF.Data.Operations
+import qualified GF.Infra.Modules as M
+import GF.Canon.CMacros (defLinType)
+import GF.Canon.MkGFC (grammar2canon)
import GF.OldParsing.Utilities
import GF.OldParsing.GrammarTypes
import GF.OldParsing.MCFGrammar (Grammar, Rule(..), Lin(..))
import GF.Data.SortedList
-- import Maybe (listToMaybe)
-import List (groupBy) -- , transpose)
+import Data.List (groupBy) -- , transpose)
import GF.Data.BacktrackM
-}
diff --git a/src/GF/OldParsing/GrammarTypes.hs b/src/GF/OldParsing/GrammarTypes.hs
index af2832bdf..fc514fc75 100644
--- a/src/GF/OldParsing/GrammarTypes.hs
+++ b/src/GF/OldParsing/GrammarTypes.hs
@@ -4,9 +4,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:53 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:46 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- All possible instantiations of different grammar formats used for parsing
--
@@ -33,8 +33,8 @@ module GF.OldParsing.GrammarTypes
(++.), (++!)
) where
-import Ident (Ident(..))
-import AbsGFC
+import GF.Infra.Ident (Ident(..))
+import GF.Canon.AbsGFC
-- import qualified GF.OldParsing.FiniteTypes.Calc as Fin
import qualified GF.OldParsing.CFGrammar as CFG
import qualified GF.OldParsing.MCFGrammar as MCFG
diff --git a/src/GF/OldParsing/IncrementalChart.hs b/src/GF/OldParsing/IncrementalChart.hs
index 2a941ec84..132ed4dc4 100644
--- a/src/GF/OldParsing/IncrementalChart.hs
+++ b/src/GF/OldParsing/IncrementalChart.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:53 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:47 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Implementation of /incremental/ deductive parsing,
-- i.e. parsing one word at the time.
@@ -22,7 +22,7 @@ module GF.OldParsing.IncrementalChart
chartList
) where
-import Array
+import Data.Array
import GF.Data.SortedList
import GF.Data.Assoc
diff --git a/src/GF/OldParsing/MCFGrammar.hs b/src/GF/OldParsing/MCFGrammar.hs
index 350c574a7..ff9d7de1b 100644
--- a/src/GF/OldParsing/MCFGrammar.hs
+++ b/src/GF/OldParsing/MCFGrammar.hs
@@ -5,15 +5,15 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:54 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:48 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Definitions of multiple context-free grammars,
-- parser information and chart conversion
-----------------------------------------------------------------------------
-module GF.OldParsing.MCFGrammar
+module GF.OldParsing.MCFGrammar
(-- * Type definitions
Grammar,
Rule(..),
diff --git a/src/GF/OldParsing/ParseCF.hs b/src/GF/OldParsing/ParseCF.hs
index 0ed19c786..e1ef32aee 100644
--- a/src/GF/OldParsing/ParseCF.hs
+++ b/src/GF/OldParsing/ParseCF.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:54 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:49 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Chart parsing of grammars in CF format
-----------------------------------------------------------------------------
@@ -20,8 +20,8 @@ import GF.Printing.PrintSimplifiedTerm
import GF.Data.SortedList (nubsort)
import GF.Data.Assoc
-import qualified CF
-import qualified CFIdent as CFI
+import qualified GF.CF.CF as CF
+import qualified GF.CF.CFIdent as CFI
import GF.OldParsing.Utilities
import GF.OldParsing.CFGrammar
import qualified GF.OldParsing.ParseCFG as P
diff --git a/src/GF/OldParsing/ParseCFG.hs b/src/GF/OldParsing/ParseCFG.hs
index 7cba41175..03c1d7dcc 100644
--- a/src/GF/OldParsing/ParseCFG.hs
+++ b/src/GF/OldParsing/ParseCFG.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:54 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:49 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Main parsing module for context-free grammars
-----------------------------------------------------------------------------
@@ -15,7 +15,7 @@
module GF.OldParsing.ParseCFG (parse) where
-import Char (toLower)
+import Data.Char (toLower)
import GF.OldParsing.Utilities
import GF.OldParsing.CFGrammar
import qualified GF.OldParsing.ParseCFG.General as PGen
diff --git a/src/GF/OldParsing/ParseCFG/General.hs b/src/GF/OldParsing/ParseCFG/General.hs
index 7ac395ba3..438c89f1a 100644
--- a/src/GF/OldParsing/ParseCFG/General.hs
+++ b/src/GF/OldParsing/ParseCFG/General.hs
@@ -5,14 +5,14 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:57 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:23:00 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Several implementations of CFG chart parsing
-----------------------------------------------------------------------------
-module GF.OldParsing.ParseCFG.General
+module GF.OldParsing.ParseCFG.General
(parse, Strategy) where
import GF.System.Tracing
diff --git a/src/GF/OldParsing/ParseCFG/Incremental.hs b/src/GF/OldParsing/ParseCFG/Incremental.hs
index 882fad26e..f1bcde404 100644
--- a/src/GF/OldParsing/ParseCFG/Incremental.hs
+++ b/src/GF/OldParsing/ParseCFG/Incremental.hs
@@ -5,27 +5,27 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:57 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:23:01 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Incremental chart parsing for context-free grammars
-----------------------------------------------------------------------------
-module GF.OldParsing.ParseCFG.Incremental
+module GF.OldParsing.ParseCFG.Incremental
(parse, Strategy) where
import GF.System.Tracing
import GF.Printing.PrintParser
-- haskell modules:
-import Array
+import Data.Array
-- gf modules:
import GF.Data.SortedList
import GF.Data.Assoc
-import Operations
+import GF.Data.Operations
-- parser modules:
import GF.OldParsing.Utilities
import GF.OldParsing.CFGrammar
diff --git a/src/GF/OldParsing/ParseGFC.hs b/src/GF/OldParsing/ParseGFC.hs
index ebd4dc782..fbc6cff5a 100644
--- a/src/GF/OldParsing/ParseGFC.hs
+++ b/src/GF/OldParsing/ParseGFC.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:54 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:50 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- The main parsing module, parsing GFC grammars
-- by translating to simpler formats, such as PMCFG and CFG
@@ -17,20 +17,20 @@ module GF.OldParsing.ParseGFC (newParser) where
import GF.System.Tracing
import GF.Printing.PrintParser
-import qualified PrGrammar
+import qualified GF.Grammar.PrGrammar as PrGrammar
-- Haskell modules
-import Monad
+import Control.Monad
-- import Ratio ((%))
-- GF modules
-import qualified Grammar as GF
-import Values
-import qualified Macros
-import qualified Modules as Mods
-import qualified AbsGFC
-import qualified Ident
-import qualified ShellState as SS
-import Operations
+import qualified GF.Grammar.Grammar as GF
+import GF.Grammar.Values
+import qualified GF.Grammar.Macros as Macros
+import qualified GF.Infra.Modules as Mods
+import qualified GF.Canon.AbsGFC as AbsGFC
+import qualified GF.Infra.Ident as Ident
+import qualified GF.Compile.ShellState as SS
+import GF.Data.Operations
import GF.Data.SortedList
-- Conversion and parser modules
import GF.Data.Assoc
diff --git a/src/GF/OldParsing/ParseMCFG.hs b/src/GF/OldParsing/ParseMCFG.hs
index ad29e5f2f..c845a76b3 100644
--- a/src/GF/OldParsing/ParseMCFG.hs
+++ b/src/GF/OldParsing/ParseMCFG.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:54 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:52 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Main module for MCFG parsing
-----------------------------------------------------------------------------
@@ -15,7 +15,7 @@
module GF.OldParsing.ParseMCFG (parse) where
-import Char (toLower)
+import Data.Char (toLower)
import GF.OldParsing.Utilities
import GF.OldParsing.MCFGrammar
import qualified GF.OldParsing.ParseMCFG.Basic as PBas
diff --git a/src/GF/OldParsing/ParseMCFG/Basic.hs b/src/GF/OldParsing/ParseMCFG/Basic.hs
index 7b0d01dde..baf7e4b2a 100644
--- a/src/GF/OldParsing/ParseMCFG/Basic.hs
+++ b/src/GF/OldParsing/ParseMCFG/Basic.hs
@@ -5,19 +5,19 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:57 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:23:03 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Simplest possible implementation of MCFG chart parsing
-----------------------------------------------------------------------------
-module GF.OldParsing.ParseMCFG.Basic
+module GF.OldParsing.ParseMCFG.Basic
(parse) where
import GF.System.Tracing
-import Ix
+import Data.Ix
import GF.OldParsing.Utilities
import GF.OldParsing.MCFGrammar
import GF.OldParsing.GeneralChart
diff --git a/src/GF/OldParsing/SimpleGFC.hs b/src/GF/OldParsing/SimpleGFC.hs
index 456c44685..59f379bb4 100644
--- a/src/GF/OldParsing/SimpleGFC.hs
+++ b/src/GF/OldParsing/SimpleGFC.hs
@@ -4,22 +4,22 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:54 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:52 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Simplistic GFC format
-----------------------------------------------------------------------------
module GF.OldParsing.SimpleGFC where
-import qualified AbsGFC
-import qualified Ident
+import qualified GF.Canon.AbsGFC as AbsGFC
+import qualified GF.Infra.Ident as Ident
import GF.Printing.PrintParser
import GF.Printing.PrintSimplifiedTerm
-import Operations (ifNull)
+import GF.Data.Operations (ifNull)
----------------------------------------------------------------------
diff --git a/src/GF/OldParsing/Utilities.hs b/src/GF/OldParsing/Utilities.hs
index 22d168973..6bacfe1fe 100644
--- a/src/GF/OldParsing/Utilities.hs
+++ b/src/GF/OldParsing/Utilities.hs
@@ -5,15 +5,15 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/04/11 13:52:55 $
--- > CVS $Author: peb $
--- > CVS $Revision: 1.1 $
+-- > CVS $Date: 2005/04/21 16:22:54 $
+-- > CVS $Author: bringert $
+-- > CVS $Revision: 1.2 $
--
-- Basic type declarations and functions to be used when parsing
-----------------------------------------------------------------------------
-module GF.OldParsing.Utilities
+module GF.OldParsing.Utilities
( -- * Symbols
Symbol(..), symbol, mapSymbol,
-- * Edges
@@ -26,8 +26,8 @@ module GF.OldParsing.Utilities
) where
-- haskell modules:
-import Monad
-import Array
+import Control.Monad
+import Data.Array
-- gf modules:
import GF.Data.SortedList
import GF.Data.Assoc