From 8413d83859ee0120e52bb1b3cd775b7344b52c76 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sat, 25 Aug 2012 11:31:50 +0100 Subject: Make a function for get_itbl, rather than using a CPP macro This has several advantages: * It can be called from gdb * There is more type information for the user, and type checking for the compiler * Less opportunity for things to go wrong, e.g. due to missing parentheses or repeated execution The sizes of the non-debug .o files hasn't changed (other than Inlines.o), so I'm pretty sure the compiled code is identical. --- rts/RaiseAsync.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'rts/RaiseAsync.c') diff --git a/rts/RaiseAsync.c b/rts/RaiseAsync.c index 9e5a8c3b2f..47d88068bf 100644 --- a/rts/RaiseAsync.c +++ b/rts/RaiseAsync.c @@ -306,7 +306,7 @@ check_target: // ASSUMPTION: tso->block_info must always point to a // closure. In the threaded RTS it does. - switch (get_itbl(mvar)->type) { + switch (get_itbl((StgClosure *)mvar)->type) { case MVAR_CLEAN: case MVAR_DIRTY: break; -- cgit v1.2.1