Commit 40f2c680 authored by simonmar's avatar simonmar

[project @ 2000-04-18 15:06:19 by simonmar]

give CAF_BLACKHOLEs a closure description/type (for profiling).
parent cfa6aee9
/* -----------------------------------------------------------------------------
* $Id: StgMiscClosures.hc,v 1.41 2000/04/05 15:20:13 simonmar Exp $
* $Id: StgMiscClosures.hc,v 1.42 2000/04/18 15:06:19 simonmar Exp $
*
* (c) The GHC Team, 1998-2000
*
......@@ -340,7 +340,7 @@ NON_ENTERABLE_ENTRY_CODE(RBH_Save_2);
#endif /* defined(PAR) || defined(GRAN) */
/* identical to BLACKHOLEs except for the infotag */
INFO_TABLE(CAF_BLACKHOLE_info, CAF_BLACKHOLE_entry,0,2,CAF_BLACKHOLE,,EF_,0,0);
INFO_TABLE(CAF_BLACKHOLE_info, CAF_BLACKHOLE_entry,0,2,CAF_BLACKHOLE,,EF_,"CAF_BLACKHOLE","CAF_BLACKHOLE");
STGFUN(CAF_BLACKHOLE_entry)
{
FB_
......
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