summaryrefslogtreecommitdiff
path: root/src/GF/Compile/Rebuild.hs
diff options
context:
space:
mode:
authoraarne <unknown>2005-03-08 17:08:58 +0000
committeraarne <unknown>2005-03-08 17:08:58 +0000
commit73b0f9dbabde5363e7386e2efcc30d6248f5ff19 (patch)
tree72ca90a8fdc76558cf590b99b43877169f2f4ead /src/GF/Compile/Rebuild.hs
parenteefced4abe9b45dbd284c639d8b8943977ba2107 (diff)
auto-insert default lincat; eliminate deps bug; less verbosity in import; take away word order variants in Scand
Diffstat (limited to 'src/GF/Compile/Rebuild.hs')
-rw-r--r--src/GF/Compile/Rebuild.hs11
1 files changed, 6 insertions, 5 deletions
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