[project @ 2000-02-29 12:27:35 by sewardj]

The GHC Prelude doesn't seem to export Addr.  Make it do so in combined
mode for compatibility with standalone mode.

diff --git a/ghc/interpreter/link.c b/ghc/interpreter/link.c
index d806a1d..aabe259 100644 (file)
--- a/ghc/interpreter/link.c
+++ b/ghc/interpreter/link.c
@@ -9,8 +9,8 @@
  * included in the distribution.
  *
  * $RCSfile: link.c,v $
- * $Revision: 1.44 $
- * $Date: 2000/02/24 12:34:19 $
+ * $Revision: 1.45 $
+ * $Date: 2000/02/29 12:27:35 $
  * ------------------------------------------------------------------------*/
 
 #include "prelude.h"
@@ -585,6 +585,14 @@ assert(nonNull(namePMFail));
            module(modulePrelude).exports
               = cons ( nm, module(modulePrelude).exports );
 
+           /* The GHC prelude doesn't seem to export Addr.  Add it to the
+              export list for the sake of compatibility with standalone mode.
+          */
+           module(modulePrelude).exports
+              = cons ( pair(typeAddr,DOTDOT), 
+                       module(modulePrelude).exports );
+           addTycon(typeAddr);
+
            /* Make nameListMonad be the builder fn for instance Monad [].
               Standalone hugs does this with a disgusting hack in 
               checkInstDefn() in static.c.  We have a slightly different