X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Finterpreter%2Finterface.c;h=da604fcd79a0db6d85c2a7fe094a2c05c1ac082d;hb=bb4971d04b8f2a9c7a1d799026f352fab3f84196;hp=6750bf36f8916a4bdedd9d20394c18df8758aeeb;hpb=e87d56ce33f663da1c445f37e95c40d814caa384;p=ghc-hetmet.git

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