diff options
author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-03-20 22:37:06 +0000 |
---|---|---|
committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-07-20 23:28:13 +0100 |
commit | c91f661cc54e358485dc7396a166dc08c6867a38 (patch) | |
tree | 269937c14366d9d6f728023366ed301ecfe36475 /universal.c | |
parent | 8c3a0f6ca6a8f3a02c3394507eb4284c1017dba1 (diff) | |
download | perl-c91f661cc54e358485dc7396a166dc08c6867a38.tar.gz |
Remove use of dVAR in core
It only does anything under PERL_GLOBAL_STRUCT, which is gone.
Keep the dNOOP defintion for CPAN back-compat
Diffstat (limited to 'universal.c')
-rw-r--r-- | universal.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/universal.c b/universal.c index 67795ac429..3bba77da18 100644 --- a/universal.c +++ b/universal.c @@ -1117,7 +1117,7 @@ XS(XS_NamedCapture_tie_it) XS(XS_NamedCapture_TIEHASH) { - dVAR; dXSARGS; + dXSARGS; if (items < 1) croak_xs_usage(cv, "package, ..."); { @@ -1152,7 +1152,7 @@ XS(XS_NamedCapture_TIEHASH) XS(XS_NamedCapture_FETCH) { - dVAR; dXSARGS; + dXSARGS; dXSI32; PERL_UNUSED_VAR(cv); /* -W */ PERL_UNUSED_VAR(ax); /* -Wall */ @@ -1197,7 +1197,7 @@ XS(XS_NamedCapture_FETCH) XS(XS_NamedCapture_FIRSTKEY) { - dVAR; dXSARGS; + dXSARGS; dXSI32; PERL_UNUSED_VAR(cv); /* -W */ PERL_UNUSED_VAR(ax); /* -Wall */ @@ -1231,7 +1231,7 @@ XS(XS_NamedCapture_FIRSTKEY) /* is this still needed? */ XS(XS_NamedCapture_flags) { - dVAR; dXSARGS; + dXSARGS; PERL_UNUSED_VAR(cv); /* -W */ PERL_UNUSED_VAR(ax); /* -Wall */ SP -= items; |