diff options
author | Sven Tennie <sven.tennie@gmail.com> | 2023-05-08 18:21:14 +0000 |
---|---|---|
committer | Sven Tennie <sven.tennie@gmail.com> | 2023-05-08 18:21:14 +0000 |
commit | b529e7cf74f25b59850255a8c4f8689a8ecfa10a (patch) | |
tree | 1f096869d12a9b63513e01cec4262cf2117d9310 | |
parent | 715eebf66b1c0e85dddb30586aee7bd6fa77c944 (diff) | |
download | haskell-b529e7cf74f25b59850255a8c4f8689a8ecfa10a.tar.gz |
Better variable name: u -> frame
The 'u' was likely introduced by copy'n'paste.
-rw-r--r-- | rts/Printer.c | 44 |
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; } |