diff options
author | sewardj <unknown> | 2001-02-12 12:44:11 +0000 |
---|---|---|
committer | sewardj <unknown> | 2001-02-12 12:44:11 +0000 |
commit | 01073a98555e9ffe1df970854f3ac604957f060d (patch) | |
tree | 48ff0f3e1736ceb5ae313334d799d71e31da3dac /ghc/rts/Interpreter.c | |
parent | 9fe0837c3a1c9d986fe8b5b581083829bdcc52f5 (diff) | |
download | haskell-01073a98555e9ffe1df970854f3ac604957f060d.tar.gz |
[project @ 2001-02-12 12:44:11 by sewardj]
debug print wibble
Diffstat (limited to 'ghc/rts/Interpreter.c')
-rw-r--r-- | ghc/rts/Interpreter.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/rts/Interpreter.c b/ghc/rts/Interpreter.c index ea0757d2c1..f371862e28 100644 --- a/ghc/rts/Interpreter.c +++ b/ghc/rts/Interpreter.c @@ -5,8 +5,8 @@ * Copyright (c) 1994-2000. * * $RCSfile: Interpreter.c,v $ - * $Revision: 1.17 $ - * $Date: 2001/02/11 17:51:07 $ + * $Revision: 1.18 $ + * $Date: 2001/02/12 12:44:11 $ * ---------------------------------------------------------------------------*/ #include "Rts.h" @@ -320,7 +320,7 @@ StgThreadReturnCode interpretBCO ( Capability* cap ) case SEQ_FRAME: /* Too complicated ... adopt the Usual Solution. */ - fprintf(stderr, "!!! SEQ frame in PAP update\n"); + /* fprintf(stderr, "!!! SEQ frame in PAP update\n"); */ goto defer_to_sched; case CATCH_FRAME: |