X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FStgMiscClosures.h;h=a4281c84069b6beb83addb72332d5b2810a95a5c;hb=0671ef05dd65137d501cb97f0e42be3b78d4004d;hp=eeaaf3ad4da6fd4d314d765c6a2834db351c8599;hpb=d7dedcdbb833d692a3be48e2405d2323fa4de72a;p=ghc-hetmet.git diff --git a/ghc/includes/StgMiscClosures.h b/ghc/includes/StgMiscClosures.h index eeaaf3a..a4281c8 100644 --- a/ghc/includes/StgMiscClosures.h +++ b/ghc/includes/StgMiscClosures.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: StgMiscClosures.h,v 1.39 2001/07/09 19:45:16 sof Exp $ + * $Id: StgMiscClosures.h,v 1.40 2001/11/08 12:46:31 simonmar Exp $ * * (c) The GHC Team, 1998-1999 * @@ -238,3 +238,60 @@ EXTINFO_RTS stg_ap_6_upd_info; EXTINFO_RTS stg_ap_7_upd_info; EXTINFO_RTS stg_ap_8_upd_info; +/* standard GC & stack check entry points */ + +EXTFUN(stg_gc_entertop); +EXTFUN(stg_gc_enter_1_hponly); +EXTFUN(__stg_gc_enter_1); +EXTFUN(stg_gc_enter_2); +EXTFUN(stg_gc_enter_3); +EXTFUN(stg_gc_enter_4); +EXTFUN(stg_gc_enter_5); +EXTFUN(stg_gc_enter_6); +EXTFUN(stg_gc_enter_7); +EXTFUN(stg_gc_enter_8); +EXTFUN(stg_gc_seq_1); + +EI_(stg_gc_noregs_ret_info); +EF_(stg_gc_noregs); + +EI_(stg_gc_unpt_r1_ret_info); +EF_(stg_gc_unpt_r1); + +EI_(stg_gc_unbx_r1_ret_info); +EF_(stg_gc_unbx_r1); + +EI_(stg_gc_f1_ret_info); +EF_(stg_gc_f1); + +EI_(stg_gc_d1_ret_info); +EF_(stg_gc_d1); + +EI_(stg_gc_ut_1_0_ret_info); +EF_(stg_gc_ut_1_0); + +EI_(stg_gc_ut_0_1_ret_info); +EF_(stg_gc_ut_0_1); + +EXTFUN(__stg_chk_0); +EXTFUN(__stg_chk_1); +EXTFUN(stg_chk_1n); +EXTFUN(stg_chk_2); +EXTFUN(stg_chk_3); +EXTFUN(stg_chk_4); +EXTFUN(stg_chk_5); +EXTFUN(stg_chk_6); +EXTFUN(stg_chk_7); +EXTFUN(stg_chk_8); +EXTFUN(stg_gen_chk_ret); +EXTFUN(stg_gen_chk); +EXTFUN(stg_gen_hp); +EXTFUN(stg_gen_yield); +EXTFUN(stg_yield_noregs); +EXTFUN(stg_yield_to_interpreter); +EXTFUN(stg_gen_block); +EXTFUN(stg_block_noregs); +EXTFUN(stg_block_1); +EXTFUN(stg_block_takemvar); +EXTFUN(stg_block_putmvar); +