projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
72efdb4
)
[project @ 2001-05-27 06:08:24 by sof]
author
sof
<unknown>
Sun, 27 May 2001 06:08:24 +0000
(06:08 +0000)
committer
sof
<unknown>
Sun, 27 May 2001 06:08:24 +0000
(06:08 +0000)
wibble
ghc/rts/Interpreter.c
patch
|
blob
|
history
diff --git
a/ghc/rts/Interpreter.c
b/ghc/rts/Interpreter.c
index
657e25f
..
7a382a4
100644
(file)
--- a/
ghc/rts/Interpreter.c
+++ b/
ghc/rts/Interpreter.c
@@
-5,8
+5,8
@@
* Copyright (c) 1994-2000.
*
* $RCSfile: Interpreter.c,v $
* Copyright (c) 1994-2000.
*
* $RCSfile: Interpreter.c,v $
- * $Revision: 1.23 $
- * $Date: 2001/05/25 18:32:51 $
+ * $Revision: 1.24 $
+ * $Date: 2001/05/27 06:08:24 $
* ---------------------------------------------------------------------------*/
#include "Rts.h"
* ---------------------------------------------------------------------------*/
#include "Rts.h"
@@
-115,7
+115,7
@@
void interp_startup ( void )
void interp_shutdown ( void )
{
int i, j, k, o_max, i_max, j_max;
void interp_shutdown ( void )
{
int i, j, k, o_max, i_max, j_max;
- fprintf(stderr, "%d constrs entered -> (%d BCO, %d UPD, %d ??)\n",
+ fprintf(stderr, "%d constrs entered -> (%d BCO, %d UPD, %d ??? )\n",
it_retto_BCO + it_retto_UPDATE + it_retto_other,
it_retto_BCO, it_retto_UPDATE, it_retto_other );
fprintf(stderr, "%d total entries, %d unknown entries \n",
it_retto_BCO + it_retto_UPDATE + it_retto_other,
it_retto_BCO, it_retto_UPDATE, it_retto_other );
fprintf(stderr, "%d total entries, %d unknown entries \n",