diff options
author | Nicholas Clark <nick@ccl4.org> | 2001-11-20 21:59:51 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-21 00:40:09 +0000 |
commit | e61d22efbb00a7fa2de05bf2c594ec3b6f671baf (patch) | |
tree | 8af835f85dda1bc7fd9f6e1627e6b47d928be746 /pp_hot.c | |
parent | 9124316ee7cc50a30161a176ef51b0432a068a78 (diff) | |
download | perl-e61d22efbb00a7fa2de05bf2c594ec3b6f671baf.tar.gz |
spaceship and refs
Message-ID: <20011120215951.U62891@plum.flirble.org>
p4raw-id: //depot/perl@13147
Diffstat (limited to 'pp_hot.c')
-rw-r--r-- | pp_hot.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -237,7 +237,8 @@ PP(pp_eq) dSP; tryAMAGICbinSET(eq,0); #ifndef NV_PRESERVES_UV if (SvROK(TOPs) && SvROK(TOPm1s)) { - SETs(boolSV(SvRV(TOPs) == SvRV(TOPm1s))); + SP--; + SETs(boolSV(SvRV(TOPs) == SvRV(TOPp1s))); RETURN; } #endif |