[project @ 1999-06-29 13:04:38 by panne]
[ghc-hetmet.git] / ghc / rts / Printer.h
1 /* -----------------------------------------------------------------------------
2  * $Id: Printer.h,v 1.4 1999/06/29 13:04:40 panne Exp $
3  *
4  * (c) The GHC Team, 1998-1999
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
22 extern void DEBUG_LoadSymbols( char *name );
23
24 extern rtsBool lookupGHCName( StgPtr addr, const char **result );
25 #endif