diff --git a/ghc/rts/RtsStartup.c b/ghc/rts/RtsStartup.c index 5155d66ea8e59f8d05ce1cee5276e46b9fcfb6ad..e7b813f6eb91da79dc58635b6010cff183813028 100644 --- a/ghc/rts/RtsStartup.c +++ b/ghc/rts/RtsStartup.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: RtsStartup.c,v 1.9 1999/03/09 14:27:06 sewardj Exp $ + * $Id: RtsStartup.c,v 1.10 1999/04/27 12:30:26 simonm Exp $ * * (c) The GHC Team, 1998-1999 * @@ -30,21 +30,6 @@ #include "LLC.h" #endif -#ifdef COMPILER -#ifndef aix_TARGET_OS /* AIX gives link errors with this as a const (RO assembler section) */ -const -#endif - StgClosure *PrelBase_Bool_closure_tbl[] = { -#ifndef HAVE_WIN32_DLL_SUPPORT - &False_closure, - &True_closure -#else - &dummy_ret_closure, - &dummy_ret_closure -#endif -}; -#endif - /* * Flag Structure */