[project @ 2004-02-12 02:04:59 by mthomas]
[ghc-hetmet.git] / ghc / rts / Printer.h
1 /* -----------------------------------------------------------------------------
2  * $Id: Printer.h,v 1.7 2002/12/11 15:36:45 simonmar Exp $
3  *
4  * (c) The GHC Team, 1998-2000
5  *
6  * Prototypes for functions in Printer.c
7  *
8  * ---------------------------------------------------------------------------*/
9
10 extern void        printPtr        ( StgPtr p );
11 extern void        printObj        ( StgClosure *obj );
12
13 #ifdef DEBUG
14 extern void        printClosure    ( StgClosure *obj );
15 extern StgStackPtr printStackObj   ( StgStackPtr sp );
16 extern void        printStackChunk ( StgStackPtr sp, StgStackPtr spLim );
17 extern void        printTSO        ( StgTSO *tso );
18
19 void               info_hdr_type   ( StgClosure *closure, char *res );
20 char  *            info_type       ( StgClosure *closure );
21 char  *            info_type_by_ip ( StgInfoTable *ip );
22
23 extern void DEBUG_LoadSymbols( char *name );
24
25 extern const char *lookupGHCName( void *addr );
26 #endif