From: simonm <unknown>
Date: Tue, 27 Apr 1999 12:30:26 +0000 (+0000)
Subject: [project @ 1999-04-27 12:30:26 by simonm]
X-Git-Tag: Approximately_9120_patches~6297
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=67a99b0ccee47fdbe98accef78208fe24d7322f9;p=ghc-hetmet.git

[project @ 1999-04-27 12:30:26 by simonm]
Remove PrelBase_Bool_closure_tbl; this is now generated automatically.
---

diff --git a/ghc/rts/RtsStartup.c b/ghc/rts/RtsStartup.c
index 5155d66..e7b813f 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
  */