CNF: Silence pointer fix-up message unless gc debugging is enabled
[ghc.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 #pragma once
10
11 #include "BeginPrivate.h"
12
13 extern void printPtr ( StgPtr p );
14 extern void printObj ( StgClosure *obj );
15
16 extern const char * closure_type_names[];
17
18 void info_hdr_type ( const StgClosure *closure, char *res );
19 const char * info_type ( const StgClosure *closure );
20 const char * info_type_by_ip ( const StgInfoTable *ip );
21 const char * info_update_frame ( const StgClosure *closure );
22
23 #if defined(DEBUG)
24 extern void printClosure ( const StgClosure *obj );
25 extern void printStackChunk ( StgPtr sp, StgPtr spLim );
26 extern void printTSO ( StgTSO *tso );
27
28 extern void DEBUG_LoadSymbols( const char *name );
29
30 extern const char *lookupGHCName( void *addr );
31
32 extern const char *what_next_strs[];
33 #endif
34
35 #include "EndPrivate.h"