Common up two closure type -> string tables
[ghc-hetmet.git] / rts / Printer.h
1 /* -----------------------------------------------------------------------------
2  *
3  * (c) The GHC Team, 1998-2005
4  *
5  * Prototypes for functions in Printer.c
6  *
7  * ---------------------------------------------------------------------------*/
8
9 #ifndef PRINTER_H
10 #define PRINTER_H
11
12 extern void        printPtr        ( StgPtr p );
13 extern void        printObj        ( StgClosure *obj );
14
15 extern char *      closure_type_names[];
16
17 void               info_hdr_type   ( StgClosure *closure, char *res );
18 char  *            info_type       ( StgClosure *closure );
19 char  *            info_type_by_ip ( StgInfoTable *ip );
20
21 #ifdef DEBUG
22 extern void        prettyPrintClosure (StgClosure *obj);
23 extern void        printClosure    ( StgClosure *obj );
24 extern StgPtr      printStackObj   ( StgPtr sp );
25 extern void        printStackChunk ( StgPtr sp, StgPtr spLim );
26 extern void        printTSO        ( StgTSO *tso );
27
28 extern void DEBUG_LoadSymbols( char *name );
29
30 extern const char *lookupGHCName( void *addr );
31 #endif
32
33 #endif /* PRINTER_H */
34