diff options
| -rw-r--r-- | universal.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/universal.c b/universal.c index 15c408d301..22841bb9c8 100644 --- a/universal.c +++ b/universal.c @@ -910,7 +910,9 @@ XS(XS_PerlIO_get_layers) XS(XS_Internals_hash_seed) { - dXSARGS; + /* Using dXSARGS would also have dITEM and dSP, + * which define 2 unused local variables. */ + dMARK; dAX; XSRETURN_UV(PL_hash_seed); } |