1 /* -*- mode: hugs-c; -*- */
2 /* --------------------------------------------------------------------------
3 * Pretty printer for stg code:
4 * ------------------------------------------------------------------------*/
6 Void printStg( FILE *fp, StgVar b);
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 );