ghc/interpreter/pp.h

   1 /* -*- mode: hugs-c; -*- */
   2 /* --------------------------------------------------------------------------
   3  * Pretty printer for stg code:
   4  * ------------------------------------------------------------------------*/
   5
   6 Void printStg( FILE *fp, StgVar b);
   7
   8 #if DEBUG_PRINTER
   9 extern Void ppStg        ( StgVar v );
  10 extern Void ppStgExpr    ( StgExpr e );
  11 extern Void ppStgRhs     ( StgRhs rhs );
  12 extern Void ppStgAlts    ( List alts );
  13 extern Void ppStgPrimAlts( List alts );
  14 extern Void ppStgVars    ( List vs );
  15 #endif
  16