Commit cc517f07 authored by sof's avatar sof
Browse files

[project @ 2002-02-04 20:26:25 by sof]

wibble
parent ea0e6441
/* -----------------------------------------------------------------------------
* $Id: Printer.c,v 1.50 2001/12/06 14:33:02 simonmar Exp $
* $Id: Printer.c,v 1.51 2002/02/04 20:26:25 sof Exp $
*
* (c) The GHC Team, 1994-2000.
*
......@@ -314,7 +314,7 @@ printClosure( StgClosure *obj )
putchar(arrWordsGetChar(obj,i));
} */
for (i=0; i<((StgArrWords *)obj)->words; i++)
fprintf(stdout, "%ld", ((StgArrWords *)obj)->payload[i]);
fprintf(stdout, "%u", ((StgArrWords *)obj)->payload[i]);
fprintf(stdout,"\")\n");
break;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment