summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ghc/includes/Updates.h4
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;