Commit 135776b8 authored by simonmar's avatar simonmar
Browse files

[project @ 2005-10-24 09:33:37 by simonmar]

Fix a warning
parent de981f81
......@@ -85,11 +85,11 @@ register double fake_f9 __asm__("$f9");
StgThreadReturnCode StgRun(StgFunPtr f, StgRegTable *basereg STG_UNUSED)
{
while (f) {
if (RtsFlags[0].DebugFlags.interpreter) {
IF_DEBUG(interpreter,
debugBelch("Jumping to ");
printPtr((P_)f); fflush(stdout);
debugBelch("\n");
}
);
f = (StgFunPtr) (f)();
}
return (StgThreadReturnCode)R1.i;
......
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