[project @ 1997-03-13 07:57:25 by sof]

[ghc-hetmet.git] / ghc / includes / SMInfoTables.lh

diff --git a/ghc/includes/SMInfoTables.lh b/ghc/includes/SMInfoTables.lh
index 674444d..bcc65eb 100644 (file)
--- a/ghc/includes/SMInfoTables.lh
+++ b/ghc/includes/SMInfoTables.lh
@@ -1746,7 +1746,11 @@ during a return.
 
 /* Declare the phantom info table vectors (just Bool at the moment) */
 #ifndef COMPILING_GHC
+#ifndef aix_TARGET_OS /* AIX gives link errors with this as a const (RO assembler section) */
 EXTDATA_RO(PrelBase_Bool_itblvtbl);
+#else
+extern W_ PrelBase_Bool_itblvtbl[];
+#endif
 #endif
 
 \end{code}