X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FInfoMacros.h;h=270842ff712d3659c190f96ef84cc56e7c0a750e;hb=6d40c9e64a408c0de2b60a26dbc8c437433b095c;hp=a503d4ad379bf01fd8220004f8f61f6da4e64161;hpb=c1c03f00dc927ea378278c9e4a744aa363ccda93;p=ghc-hetmet.git diff --git a/ghc/includes/InfoMacros.h b/ghc/includes/InfoMacros.h index a503d4a..270842f 100644 --- a/ghc/includes/InfoMacros.h +++ b/ghc/includes/InfoMacros.h @@ -1,5 +1,5 @@ /* ---------------------------------------------------------------------------- - * $Id: InfoMacros.h,v 1.6 1999/05/13 17:31:06 simonm Exp $ + * $Id: InfoMacros.h,v 1.7 1999/06/25 09:13:37 simonmar Exp $ * * (c) The GHC Team, 1998-1999 * @@ -110,7 +110,7 @@ INFO_TABLE_CONSTR(info, entry, ptrs, nptrs, tag_,type_,info_class, \ * layout field, so we only need one macro for these. */ -#ifndef USE_MINIINTERPRETER +#ifdef TABLES_NEXT_TO_CODE typedef struct { StgFunPtr vec[2]; @@ -373,7 +373,7 @@ typedef struct { alt_5, alt_6, alt_7, alt_8 } \ } -#endif /* MINI_INTERPRETER */ +#endif /* TABLES_NEXT_TO_CODE */ /* For polymorphic activation records, we need both a direct return * address and a return vector: @@ -381,7 +381,7 @@ typedef struct { typedef vec_info_8 StgPolyInfoTable; -#ifdef USE_MINIINTERPRETER +#ifndef TABLES_NEXT_TO_CODE #define VEC_POLY_INFO_TABLE(nm, bitmap_, \ srt_, srt_off_, srt_len_, \