threadPaused: fix pointer arithmetic

Noticed by Henrique Ferreiro <hferreiro@udc.es>, thanks!

diff --git a/rts/ThreadPaused.c b/rts/ThreadPaused.c
index 7aee59d..94a5a15 100644 (file)
--- a/rts/ThreadPaused.c
+++ b/rts/ThreadPaused.c
@@ -252,7 +252,7 @@ threadPaused(Capability *cap, StgTSO *tso)
 
                // And continue with threadPaused; there might be
                // yet more computation to suspend.
 
                // And continue with threadPaused; there might be
                // yet more computation to suspend.

-                frame = (StgClosure *)tso->sp + 2;
+                frame = (StgClosure *)(tso->sp + 2);

                 prev_was_update_frame = rtsFalse;
                 continue;
            }
                 prev_was_update_frame = rtsFalse;
                 continue;
            }