summaryrefslogtreecommitdiff
path: root/src/GF/Parsing/MCFG/ViaCFG.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Parsing/MCFG/ViaCFG.hs')
-rw-r--r--src/GF/Parsing/MCFG/ViaCFG.hs14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/GF/Parsing/MCFG/ViaCFG.hs b/src/GF/Parsing/MCFG/ViaCFG.hs
index f1b76bb75..5007eec20 100644
--- a/src/GF/Parsing/MCFG/ViaCFG.hs
+++ b/src/GF/Parsing/MCFG/ViaCFG.hs
@@ -8,24 +8,24 @@
Ljunglöf (2004)
------------------------------------------------------------------------------}
-module ApproxParse where
+module GF.Parsing.MCFG.ViaCFG where
-- Haskell modules
-import List
-import Monad
+import Data.List
+import Control.Monad
-- GF modules
import ConvertMCFGtoDecoratedCFG
import qualified DecoratedCFParser as CFP
import qualified DecoratedGrammar as CFG
import Examples
-import GeneralChart
-import qualified MCFGrammar as MCFG
+import GF.OldParsing.GeneralChart
+import qualified GF.OldParsing.MCFGrammar as MCFG
import MCFParser
import Nondet
import Parser
-import Range
+import GF.Parsing.MCFG.Range
{-- Datatypes -----------------------------------------------------------------
@@ -180,4 +180,4 @@ symToRec beta = map makeLblRng $ groupBy (\(_, d) (_, d') -> (d == d'))
sBd (_, d) (_, d')
| d < d' = LT
| d > d' = GT
- | otherwise = EQ \ No newline at end of file
+ | otherwise = EQ