summaryrefslogtreecommitdiff
path: root/universal.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2003-09-09 00:04:45 +0100
committerJarkko Hietaniemi <jhi@iki.fi>2003-09-08 21:10:53 +0000
commitc85d3f85e8d942eb3da18d6f77a57c6e1848b7f0 (patch)
treedc4676f9f23c84fccb59304f4dc563fd6b620a97 /universal.c
parent9a7034eb2c2d4f0ed795b3c479d700ded086d7e8 (diff)
downloadperl-c85d3f85e8d942eb3da18d6f77a57c6e1848b7f0.tar.gz
silence 1 compiler warning
Message-ID: <20030908230445.E30881@plum.flirble.org> p4raw-id: //depot/perl@21113
Diffstat (limited to 'universal.c')
-rw-r--r--universal.c4
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);
}