From 5c9917ff8d18ddaefd5a8bf4b223009747477fd8 Mon Sep 17 00:00:00 2001
From: bringert <unknown>
Date: Thu, 21 Apr 2005 15:21:02 +0000
Subject: Fixed module names and imports after giant file move.

---
 src/GF/Parsing/MCFG/ViaCFG.hs | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'src/GF/Parsing/MCFG/ViaCFG.hs')

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
-- 
cgit v1.2.3