X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FStgStartup.h;h=f983e2297c5ce6e6f9a4853f978941b0a17ade7f;hb=fb7a723bfd7650a705cb226e07c5b08b7a8e9279;hp=1fd72d7e1e80ffc78bb6860986dd9c23171318f7;hpb=438596897ebbe25a07e1c82085cfbc5bdb00f09e;p=ghc-hetmet.git diff --git a/ghc/rts/StgStartup.h b/ghc/rts/StgStartup.h index 1fd72d7..f983e22 100644 --- a/ghc/rts/StgStartup.h +++ b/ghc/rts/StgStartup.h @@ -1,5 +1,7 @@ /* ----------------------------------------------------------------------------- - * $Id: StgStartup.h,v 1.2 1998/12/02 13:28:54 simonm Exp $ + * $Id: StgStartup.h,v 1.5 2001/09/04 18:29:21 ken Exp $ + * + * (c) The GHC Team, 1998-1999 * * Code for starting, stopping and restarting threads. * @@ -10,8 +12,6 @@ EXTFUN(stg_stop_thread_entry); EXTFUN(stg_returnToStackTop); EXTFUN(stg_enterStackTop); -#ifdef PROFILING -EXTFUN(stg_register_ret); -EXTFUN(stg_register); -EXTFUN(regPrelGHC); -#endif +EXTFUN(stg_init_ret); +EXTFUN(stg_init); +EXTFUN(__stginit_PrelGHC);