From: rrt Date: Tue, 6 Feb 2001 11:41:04 +0000 (+0000) Subject: [project @ 2001-02-06 11:41:04 by rrt] X-Git-Tag: Approximately_9120_patches~2740 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=839930a03a9237d3a8c78745c6167f666fedada9;p=ghc-hetmet.git [project @ 2001-02-06 11:41:04 by rrt] Corrected comment according to code. --- diff --git a/ghc/includes/ClosureMacros.h b/ghc/includes/ClosureMacros.h index 1c9b20e..0690981 100644 --- a/ghc/includes/ClosureMacros.h +++ b/ghc/includes/ClosureMacros.h @@ -1,5 +1,5 @@ /* ---------------------------------------------------------------------------- - * $Id: ClosureMacros.h,v 1.31 2001/01/26 14:17:31 simonpj Exp $ + * $Id: ClosureMacros.h,v 1.32 2001/02/06 11:41:04 rrt Exp $ * * (c) The GHC Team, 1998-1999 * @@ -126,7 +126,7 @@ static __inline__ StgFunPtr get_entry(const StgInfoTable *itbl) { Static closures are defined as follows: - SET_STATIC_HDR(PrelBase_CZh_closure,PrelBase_CZh_info,costCentreStack,const); + SET_STATIC_HDR(PrelBase_CZh_closure,PrelBase_CZh_info,costCentreStack,closure_class,info_class); The info argument must have type 'StgInfoTable' or 'StgSRTInfoTable', since we use '&' to get its address in the macro.