diff --git a/ghc/includes/GranSim.lh b/ghc/includes/GranSim.lh index 67143558261599f64cc86dafcc443e424a491f3a..2b81deac9e3a77e5278722cc8f7a987d42502b21 100644 --- a/ghc/includes/GranSim.lh +++ b/ghc/includes/GranSim.lh @@ -384,11 +384,11 @@ void PerformReschedule PROTO((W_, rtsBool)); #define GRAN_FETCH() /*nothing */ #define GRAN_FETCH_AND_RESCHEDULE(liveness_mask,reenter) \ - do { if(liveness_mask&LIVENESS_R1) \ - SaveAllStgRegs(); \ - GranSimFetch(Node); \ - PerformReschedule(liveness_mask,reenter); \ - RestoreAllStgRegs(); \ + do { if(liveness_mask&LIVENESS_R1){ \ + SaveAllStgRegs(); \ + GranSimFetch(Node); \ + PerformReschedule(liveness_mask,reenter); \ + RestoreAllStgRegs();} \ } while(0) #define GRAN_RESCHEDULE(liveness_mask,reenter) GRAN_FETCH_AND_RESCHEDULE(liveness_mask,reenter)