X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/0f2b45c74307980ff2b0d608d505ccbe87840a2f..b084bc872b1f5913720822fd8869b542ba5ef81e:/perl.c?ds=sidebyside diff --git a/perl.c b/perl.c index 94c810e..15e9150 100644 --- a/perl.c +++ b/perl.c @@ -4939,7 +4939,7 @@ void Perl_call_list(pTHX_ I32 oldscope, AV *paramList) { SV *atsv; - volatile const line_t oldline = PL_curcop ? CopLINE(PL_curcop) : 0; + VOL const line_t oldline = PL_curcop ? CopLINE(PL_curcop) : 0; CV *cv; STRLEN len; int ret;