X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FRtsUtils.h;h=909e243b7a149f033b5a8551f9872a6570cb0c44;hb=661c97c65e5fa47177502e592bb763f752b487ac;hp=93139367b31c06b4de7cc5dc5a704c3869cbb25e;hpb=e3c55aebd4f9ce7a5b4390d4726612865fd207f2;p=ghc-hetmet.git diff --git a/rts/RtsUtils.h b/rts/RtsUtils.h index 9313936..909e243 100644 --- a/rts/RtsUtils.h +++ b/rts/RtsUtils.h @@ -1,6 +1,6 @@ /* ----------------------------------------------------------------------------- * - * (c) The GHC Team, 1998-2005 + * (c) The GHC Team, 1998-2009 * * General utility functions used in the RTS. * @@ -9,43 +9,45 @@ #ifndef RTSUTILS_H #define RTSUTILS_H +BEGIN_RTS_PRIVATE + /* ----------------------------------------------------------------------------- * (Checked) dynamic allocation * -------------------------------------------------------------------------- */ -extern void *stgMallocBytes(int n, char *msg) +void initAllocator(void); +void shutdownAllocator(void); + +void *stgMallocBytes(int n, char *msg) GNUC3_ATTRIBUTE(__malloc__); -extern void *stgReallocBytes(void *p, int n, char *msg); +void *stgReallocBytes(void *p, int n, char *msg); -extern void *stgCallocBytes(int n, int m, char *msg) +void *stgCallocBytes(int n, int m, char *msg) GNUC3_ATTRIBUTE(__malloc__); -extern void stgFree(void* p); +void stgFree(void* p); /* ----------------------------------------------------------------------------- * Misc other utilities * -------------------------------------------------------------------------- */ -extern void heapOverflow(void); +void heapOverflow(void); -extern void setNonBlockingFd(int fd); -extern void resetNonBlockingFd(int fd); +char *time_str(void); +char *showStgWord64(StgWord64, char *, rtsBool); -extern nat stg_strlen(char *str); +#ifdef DEBUG +void heapCheckFail( void ); +#endif -extern char *time_str(void); -extern char *ullong_format_string(ullong, char *, rtsBool); +void printRtsInfo(void); -#ifdef PAR -extern ullong msTime(void); -#endif +/* Alternate to raise(3) for threaded rts, for OpenBSD */ +int genericRaise(int sig); -#ifdef DEBUG -extern void heapCheckFail( void ); -#endif +int rts_isProfiled(void); -extern void* __hscore_get_saved_termios(int fd); -extern void __hscore_set_saved_termios(int fd, void* ts); +END_RTS_PRIVATE #endif /* RTSUTILS_H */