/* -----------------------------------------------------------------------------
- * $Id: StgMiscClosures.h,v 1.11 1999/03/02 19:44:20 sof Exp $
+ * $Id: StgMiscClosures.h,v 1.12 1999/05/11 16:47:41 keithw Exp $
*
* (c) The GHC Team, 1998-1999
*
STGFUN(CAF_BLACKHOLE_entry);
STGFUN(BLACKHOLE_entry);
STGFUN(BLACKHOLE_BQ_entry);
+#ifdef TICKY_TICKY
+STGFUN(SE_BLACKHOLE_entry);
+STGFUN(SE_CAF_BLACKHOLE_entry);
+#endif
STGFUN(BCO_entry);
STGFUN(EVACUATED_entry);
STGFUN(FOREIGN_entry);
extern DLL_IMPORT_RTS const StgInfoTable CAF_BLACKHOLE_info;
extern DLL_IMPORT_RTS const StgInfoTable BLACKHOLE_info;
extern DLL_IMPORT_RTS const StgInfoTable BLACKHOLE_BQ_info;
+#ifdef TICKY_TICKY
+extern DLL_IMPORT_RTS const StgInfoTable SE_BLACKHOLE_info;
+extern DLL_IMPORT_RTS const StgInfoTable SE_CAF_BLACKHOLE_info;
+#endif
extern DLL_IMPORT_RTS const StgInfoTable BCO_info;
extern DLL_IMPORT_RTS const StgInfoTable EVACUATED_info;
extern DLL_IMPORT_RTS const StgInfoTable FOREIGN_info;
extern StgFun stg_error_entry;
+ /* (see also below -- KSW 1998-12) */
+
/* standard selector thunks */
#ifdef COMPILING_RTS
EI__ __sel_14_noupd_info;
EI__ __sel_15_noupd_info;
+ /* and their standard entry points -- KSW 1998-12 */
+
+EF_(__sel_0_upd_entry);
+EF_(__sel_1_upd_entry);
+EF_(__sel_2_upd_entry);
+EF_(__sel_3_upd_entry);
+EF_(__sel_4_upd_entry);
+EF_(__sel_5_upd_entry);
+EF_(__sel_6_upd_entry);
+EF_(__sel_7_upd_entry);
+EF_(__sel_8_upd_entry);
+EF_(__sel_8_upd_entry);
+EF_(__sel_9_upd_entry);
+EF_(__sel_10_upd_entry);
+EF_(__sel_11_upd_entry);
+EF_(__sel_12_upd_entry);
+EF_(__sel_13_upd_entry);
+EF_(__sel_14_upd_entry);
+EF_(__sel_15_upd_entry);
+
+EF_(__sel_0_noupd_entry);
+EF_(__sel_1_noupd_entry);
+EF_(__sel_2_noupd_entry);
+EF_(__sel_3_noupd_entry);
+EF_(__sel_4_noupd_entry);
+EF_(__sel_5_noupd_entry);
+EF_(__sel_6_noupd_entry);
+EF_(__sel_7_noupd_entry);
+EF_(__sel_8_noupd_entry);
+EF_(__sel_9_noupd_entry);
+EF_(__sel_10_noupd_entry);
+EF_(__sel_11_noupd_entry);
+EF_(__sel_12_noupd_entry);
+EF_(__sel_13_noupd_entry);
+EF_(__sel_14_noupd_entry);
+EF_(__sel_15_noupd_entry);
+
/* standard ap thunks */
EI__ __ap_1_upd_info;