[project @ 2001-09-04 18:29:20 by ken]
[ghc-hetmet.git] / ghc / rts / StgStartup.h
index 0bd3b52..f983e22 100644 (file)
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: StgStartup.h,v 1.3 1999/02/05 16:03:00 simonm Exp $
+ * $Id: StgStartup.h,v 1.5 2001/09/04 18:29:21 ken Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -12,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);