Commit fb431441 authored by simonmar's avatar simonmar
Browse files

[project @ 2001-08-10 09:41:17 by simonmar]

Claim that MUT_CONS closures have 1 pointer and 1 non-pointer field,
so that the default threading code in GCCompact works for them (it
doesn't thread the mut_link field).  This also matches MUT_VARs, so
it's more consistent.
parent bdff5e42
/* -----------------------------------------------------------------------------
* $Id: StgMiscClosures.hc,v 1.67 2001/07/23 17:23:20 simonmar Exp $
* $Id: StgMiscClosures.hc,v 1.68 2001/08/10 09:41:17 simonmar Exp $
*
* (c) The GHC Team, 1998-2000
*
......@@ -730,7 +730,7 @@ NON_ENTERABLE_ENTRY_CODE(END_MUT_LIST);
SET_STATIC_HDR(stg_END_MUT_LIST_closure,stg_END_MUT_LIST_info,0/*CC*/,,EI_)
, /*payload*/{} };
INFO_TABLE(stg_MUT_CONS_info, stg_MUT_CONS_entry, 2, 0, MUT_CONS, , EF_, 0, 0);
INFO_TABLE(stg_MUT_CONS_info, stg_MUT_CONS_entry, 1, 1, MUT_CONS, , EF_, 0, 0);
NON_ENTERABLE_ENTRY_CODE(MUT_CONS);
/* -----------------------------------------------------------------------------
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment