From 0a3915c94f4c26539475047b83ac6853f1a233fb Mon Sep 17 00:00:00 2001 From: wolfgang Date: Wed, 25 Sep 2002 20:44:23 +0000 Subject: [PATCH] [project @ 2002-09-25 20:44:23 by wolfgang] merge rev. 1.33.8.1 --- ghc/includes/ClosureMacros.h | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/includes/ClosureMacros.h b/ghc/includes/ClosureMacros.h index 70470e9..b33e86a 100644 --- a/ghc/includes/ClosureMacros.h +++ b/ghc/includes/ClosureMacros.h @@ -1,5 +1,5 @@ /* ---------------------------------------------------------------------------- - * $Id: ClosureMacros.h,v 1.33 2001/11/22 14:25:11 simonmar Exp $ + * $Id: ClosureMacros.h,v 1.34 2002/09/25 20:44:23 wolfgang Exp $ * * (c) The GHC Team, 1998-1999 * @@ -59,7 +59,7 @@ #define get_itbl(c) (INFO_PTR_TO_STRUCT((c)->header.info)) #ifdef TABLES_NEXT_TO_CODE -#define INIT_ENTRY(e) code : {} +#define INIT_ENTRY(e) #define ENTRY_CODE(info) (info) #define INFO_PTR_TO_STRUCT(info) ((StgInfoTable *)(info) - 1) static __inline__ StgFunPtr get_entry(const StgInfoTable *itbl) { -- 1.7.10.4