summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSven Tennie <sven.tennie@gmail.com>2023-05-08 18:21:14 +0000
committerSven Tennie <sven.tennie@gmail.com>2023-05-08 18:21:14 +0000
commitb529e7cf74f25b59850255a8c4f8689a8ecfa10a (patch)
tree1f096869d12a9b63513e01cec4262cf2117d9310
parent715eebf66b1c0e85dddb30586aee7bd6fa77c944 (diff)
downloadhaskell-b529e7cf74f25b59850255a8c4f8689a8ecfa10a.tar.gz
Better variable name: u -> frame
The 'u' was likely introduced by copy'n'paste.
-rw-r--r--rts/Printer.c44
1 files changed, 22 insertions, 22 deletions
diff --git a/rts/Printer.c b/rts/Printer.c
index 9158460a35..fcf7797a84 100644
--- a/rts/Printer.c
+++ b/rts/Printer.c
@@ -259,79 +259,79 @@ printClosure( const StgClosure *obj )
case UPDATE_FRAME:
{
- StgUpdateFrame* u = (StgUpdateFrame*)obj;
+ StgUpdateFrame* frame = (StgUpdateFrame*)obj;
debugBelch("%s(", info_update_frame(obj));
- printPtr((StgPtr)GET_INFO((StgClosure *)u));
+ printPtr((StgPtr)GET_INFO((StgClosure *)frame));
debugBelch(",");
- printPtr((StgPtr)u->updatee);
+ printPtr((StgPtr)frame->updatee);
debugBelch(")\n");
break;
}
case CATCH_FRAME:
{
- StgCatchFrame* u = (StgCatchFrame*)obj;
+ StgCatchFrame* frame = (StgCatchFrame*)obj;
debugBelch("CATCH_FRAME(");
- printPtr((StgPtr)GET_INFO((StgClosure *)u));
+ printPtr((StgPtr)GET_INFO((StgClosure *)frame));
debugBelch(",");
- printPtr((StgPtr)u->handler);
+ printPtr((StgPtr)frame->handler);
debugBelch(")\n");
break;
}
case UNDERFLOW_FRAME:
{
- StgUnderflowFrame* u = (StgUnderflowFrame*)obj;
+ StgUnderflowFrame* frame = (StgUnderflowFrame*)obj;
debugBelch("UNDERFLOW_FRAME(");
- printPtr((StgPtr)u->next_chunk);
+ printPtr((StgPtr)frame->next_chunk);
debugBelch(")\n");
break;
}
case STOP_FRAME:
{
- StgStopFrame* u = (StgStopFrame*)obj;
+ StgStopFrame* frame = (StgStopFrame*)obj;
debugBelch("STOP_FRAME(");
- printPtr((StgPtr)GET_INFO((StgClosure *)u));
+ printPtr((StgPtr)GET_INFO((StgClosure *)frame));
debugBelch(")\n");
break;
}
case ATOMICALLY_FRAME:
{
- StgAtomicallyFrame* u = (StgAtomicallyFrame*)obj;
+ StgAtomicallyFrame* frame = (StgAtomicallyFrame*)obj;
debugBelch("ATOMICALLY_FRAME(");
- printPtr((StgPtr)GET_INFO((StgClosure *)u));
+ printPtr((StgPtr)GET_INFO((StgClosure *)frame));
debugBelch(",");
- printPtr((StgPtr)u->code);
+ printPtr((StgPtr)frame->code);
debugBelch(",");
- printPtr((StgPtr)u->result);
+ printPtr((StgPtr)frame->result);
debugBelch(")\n");
break;
}
case CATCH_RETRY_FRAME:
{
- StgCatchRetryFrame* u = (StgCatchRetryFrame*)obj;
+ StgCatchRetryFrame* frame = (StgCatchRetryFrame*)obj;
debugBelch("CATCH_RETRY_FRAME(");
- printPtr((StgPtr)GET_INFO((StgClosure *)u));
+ printPtr((StgPtr)GET_INFO((StgClosure *)frame));
debugBelch(",");
- printPtr((StgPtr)u->first_code);
+ printPtr((StgPtr)frame->first_code);
debugBelch(",");
- printPtr((StgPtr)u->alt_code);
+ printPtr((StgPtr)frame->alt_code);
debugBelch(")\n");
break;
}
case CATCH_STM_FRAME:
{
- StgCatchSTMFrame* u = (StgCatchSTMFrame*)obj;
+ StgCatchSTMFrame* frame = (StgCatchSTMFrame*)obj;
debugBelch("CATCH_STM_FRAME(");
- printPtr((StgPtr)GET_INFO((StgClosure *)u));
+ printPtr((StgPtr)GET_INFO((StgClosure *)frame));
debugBelch(",");
- printPtr((StgPtr)u->code);
+ printPtr((StgPtr)frame->code);
debugBelch(",");
- printPtr((StgPtr)u->handler);
+ printPtr((StgPtr)frame->handler);
debugBelch(")\n");
break;
}