From 73b0f9dbabde5363e7386e2efcc30d6248f5ff19 Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Tue, 8 Mar 2005 17:08:58 +0000
Subject: auto-insert default lincat; eliminate deps bug; less verbosity in
 import; take away word order variants in Scand

---
 src/GF/Compile/Rebuild.hs | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'src/GF/Compile/Rebuild.hs')

diff --git a/src/GF/Compile/Rebuild.hs b/src/GF/Compile/Rebuild.hs
index 1dee8624c..b00397eb9 100644
--- a/src/GF/Compile/Rebuild.hs
+++ b/src/GF/Compile/Rebuild.hs
@@ -5,9 +5,9 @@
 -- Stability   : (stable)
 -- Portability : (portable)
 --
--- > CVS $Date: 2005/02/18 19:21:09 $ 
--- > CVS $Author: peb $
--- > CVS $Revision: 1.9 $
+-- > CVS $Date: 2005/03/08 18:08:58 $ 
+-- > CVS $Author: aarne $
+-- > CVS $Revision: 1.10 $
 --
 -- Rebuild a source module from incomplete and its with-instance.
 -----------------------------------------------------------------------------
@@ -30,8 +30,9 @@ import Operations
 rebuildModule :: [SourceModule] -> SourceModule -> Err SourceModule
 rebuildModule ms mo@(i,mi) = do
   let gr = MGrammar ms
-  deps <- moduleDeps ms
-  is   <- openInterfaces deps i
+----  deps <- moduleDeps ms
+----  is   <- openInterfaces deps i
+  let is = [] ---- the method above is buggy: try "i -src" for two grs. AR 8/3/2005
   mi'  <- case mi of
 
     -- add the information given in interface into an instance module
-- 
cgit v1.2.3