From bb4971d04b8f2a9c7a1d799026f352fab3f84196 Mon Sep 17 00:00:00 2001
From: sewardj <unknown>
Date: Thu, 24 Feb 2000 12:34:19 +0000
Subject: [PATCH] [project @ 2000-02-24 12:34:18 by sewardj] #ifdef wurbles to
 aid Win32 compilation.

---
 ghc/interpreter/interface.c |    8 ++++----
 ghc/interpreter/link.c      |    6 +++---
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/ghc/interpreter/interface.c b/ghc/interpreter/interface.c
index 6750bf3..da604fc 100644
--- a/ghc/interpreter/interface.c
+++ b/ghc/interpreter/interface.c
@@ -7,8 +7,8 @@
  * Hugs version 1.4, December 1997
  *
  * $RCSfile: interface.c,v $
- * $Revision: 1.31 $
- * $Date: 2000/02/14 11:13:11 $
+ * $Revision: 1.32 $
+ * $Date: 2000/02/24 12:34:18 $
  * ------------------------------------------------------------------------*/
 
 #include "prelude.h"
@@ -2570,8 +2570,8 @@ Type type; {
       Sym(shutdownHaskellAndExit)    \
 
 
-/* AJG Hack */
-#if 0
+/* AJG Hack; for the moment, make EXTERN_SYMS vanish on Win32 */
+#ifdef _WIN32
 #undef EXTERN_SYMS
 #define EXTERN_SYMS
 #endif
diff --git a/ghc/interpreter/link.c b/ghc/interpreter/link.c
index d15a756..d806a1d 100644
--- a/ghc/interpreter/link.c
+++ b/ghc/interpreter/link.c
@@ -9,8 +9,8 @@
  * included in the distribution.
  *
  * $RCSfile: link.c,v $
- * $Revision: 1.43 $
- * $Date: 2000/02/14 11:13:11 $
+ * $Revision: 1.44 $
+ * $Date: 2000/02/24 12:34:19 $
  * ------------------------------------------------------------------------*/
 
 #include "prelude.h"
@@ -759,5 +759,5 @@ assert(nonNull(namePMFail));
 }
 #undef pFun
 
-#include "fooble.c"
+//#include "fooble.c"
 /*-------------------------------------------------------------------------*/
-- 
1.7.10.4