[project @ 2001-11-28 15:43:23 by simonmar]
[ghc-hetmet.git] / ghc / rts / Printer.h
1 /* -----------------------------------------------------------------------------
2  * $Id: Printer.h,v 1.6 2001/11/28 15:43:23 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        printStack      ( StgStackPtr sp, StgStackPtr spLim, 
18                                      StgUpdateFrame* su );
19 extern void        printTSO        ( StgTSO *tso );
20
21 void               info_hdr_type   ( StgClosure *closure, char *res );
22 char  *            info_type       ( StgClosure *closure );
23 char  *            info_type_by_ip ( StgInfoTable *ip );
24
25 extern void DEBUG_LoadSymbols( char *name );
26
27 extern const char *lookupGHCName( void *addr );
28 #endif