diff options
-rw-r--r-- | ghc/includes/Updates.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/includes/Updates.h b/ghc/includes/Updates.h index 419e0f6297..0d0bf2ff6f 100644 --- a/ghc/includes/Updates.h +++ b/ghc/includes/Updates.h @@ -227,7 +227,7 @@ DEBUG_FILL_SLOP(StgClosure *p) switch (inf->type) { case BLACKHOLE: - break; + return; case AP_STACK: sz = ((StgAP_STACK *)p)->size + sizeofW(StgAP_STACK) - sizeofW(StgHeader); break; @@ -235,7 +235,7 @@ DEBUG_FILL_SLOP(StgClosure *p) #ifdef SMP ((StgSelector *)p)->selectee = 0; #endif - break; + return; default: sz = inf->layout.payload.ptrs + inf->layout.payload.nptrs; break; |