diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2018-05-17 09:04:05 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2018-05-17 11:21:11 +0100 |
| commit | 5f15d53a98ad2f26465730d8c3463ccc58f6d94a (patch) | |
| tree | 794bee5ceb0ac5e0744a2aa2dcab62518a8b4e2b /rts/sm | |
| parent | b701e4754d1d6286e233c73d7360926f3eaae577 (diff) | |
| download | haskell-5f15d53a98ad2f26465730d8c3463ccc58f6d94a.tar.gz | |
Add /* fallthrough */ to fix -Wimplicit-fallthrough warning
Diffstat (limited to 'rts/sm')
| -rw-r--r-- | rts/sm/Scav.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/rts/sm/Scav.c b/rts/sm/Scav.c index 5db0acbbee..770865ce9f 100644 --- a/rts/sm/Scav.c +++ b/rts/sm/Scav.c @@ -1722,9 +1722,11 @@ scavenge_static(void) case FUN_STATIC: scavenge_fun_srt(info); - // fallthrough: a FUN_STATIC can also be an SRT, so it may have pointer - // fields. See Note [SRTs] in CmmBuildInfoTables, specifically the [FUN] - // optimisation. + /* fallthrough */ + + // a FUN_STATIC can also be an SRT, so it may have pointer + // fields. See Note [SRTs] in CmmBuildInfoTables, specifically + // the [FUN] optimisation. case CONSTR: case CONSTR_NOCAF: |