This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
INCMARK is a statement now; don't cast it
authorLukas Mai <l.mai@web.de>
Mon, 8 Aug 2016 01:09:54 +0000 (03:09 +0200)
committerLukas Mai <l.mai@web.de>
Mon, 8 Aug 2016 01:09:54 +0000 (03:09 +0200)
perl.c

diff --git a/perl.c b/perl.c
index ec73f15..44f8642 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -2848,7 +2848,7 @@ Perl_call_sv(pTHX_ SV *sv, VOL I32 flags)
        (void)POPMARK;
         old_cxix = cxstack_ix;
        create_eval_scope(NULL, flags|G_FAKINGEVAL);
-       (void)INCMARK;
+       INCMARK;
 
        JMPENV_PUSH(ret);