X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=includes%2FStgMiscClosures.h;h=562099629950d0d92b12ac0c3d6d221d5f684b8c;hp=72a7b55319c095a67106d16422a1f0d0e7d32a8a;hb=540311cfcf08b7184d7ab57245b18214bd4b9173;hpb=15b962fe9d3033f7d85147f652f1702d36b7e29d diff --git a/includes/StgMiscClosures.h b/includes/StgMiscClosures.h index 72a7b55..5620996 100644 --- a/includes/StgMiscClosures.h +++ b/includes/StgMiscClosures.h @@ -118,6 +118,7 @@ RTS_INFO(stg_AP_info); RTS_INFO(stg_AP_STACK_info); RTS_INFO(stg_dummy_ret_info); RTS_INFO(stg_raise_info); +RTS_INFO(stg_raise_ret_info); RTS_INFO(stg_TVAR_WATCH_QUEUE_info); RTS_INFO(stg_INVARIANT_CHECK_QUEUE_info); RTS_INFO(stg_ATOMIC_INVARIANT_info); @@ -174,6 +175,7 @@ RTS_ENTRY(stg_AP_entry); RTS_ENTRY(stg_AP_STACK_entry); RTS_ENTRY(stg_dummy_ret_entry); RTS_ENTRY(stg_raise_entry); +RTS_ENTRY(stg_raise_ret_ret); RTS_ENTRY(stg_END_STM_WATCH_QUEUE_entry); RTS_ENTRY(stg_END_INVARIANT_CHECK_QUEUE_entry); RTS_ENTRY(stg_END_STM_CHUNK_LIST_entry); @@ -484,6 +486,7 @@ RTS_FUN(stg_returnToStackTop); RTS_FUN(stg_returnToSched); RTS_FUN(stg_returnToSchedNotPaused); RTS_FUN(stg_returnToSchedButFirst); +RTS_FUN(stg_threadFinished); RTS_FUN(stg_init_finish); RTS_FUN(stg_init); @@ -588,8 +591,8 @@ RTS_FUN(readTVarzh_fast); RTS_FUN(writeTVarzh_fast); RTS_FUN(checkzh_fast); -RTS_FUN(infoPtrzh_fast); -RTS_FUN(closurePayloadzh_fast); +RTS_FUN(unpackClosurezh_fast); +RTS_FUN(getApStackValzh_fast); RTS_FUN(noDuplicatezh_fast);