diff options
author | Lukas Mai <l.mai@web.de> | 2017-10-13 19:50:24 +0200 |
---|---|---|
committer | Lukas Mai <l.mai@web.de> | 2017-10-13 19:50:24 +0200 |
commit | 2165bd23259a778c0554f86f5652881f24fdafc9 (patch) | |
tree | 72cc6551c3f4728dec502d11a0cfa5718e58f0b5 /gv.c | |
parent | 0c6f4d86ce77533b050038c7513faa7f574ed151 (diff) | |
download | perl-2165bd23259a778c0554f86f5652881f24fdafc9.tar.gz |
get rid of "implicit fallthrough" warnings with gcc 7
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -3537,7 +3537,7 @@ Perl_amagic_call(pTHX_ SV *left, SV *right, int method, int flags) res = &PL_sv_undef; SP = PL_stack_base + oldmark; break; - case G_ARRAY: { + case G_ARRAY: if (flags & AMGf_want_list) { res = sv_2mortal((SV *)newAV()); av_extend((AV *)res, nret); @@ -3546,7 +3546,6 @@ Perl_amagic_call(pTHX_ SV *left, SV *right, int method, int flags) break; } /* FALLTHROUGH */ - } default: res = POPs; break; |