summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--pp.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/pp.c b/pp.c
index 3e22febc33..d5337384b5 100644
--- a/pp.c
+++ b/pp.c
@@ -2874,7 +2874,7 @@ PP(pp_int)
{
dVAR; dSP; dTARGET; tryAMAGICun(int);
{
- SV *sv = TOPs;
+ dTOPss;
IV iv;
/* XXX it's arguable that compiler casting to IV might be subtly
different from modf (for numbers inside (IV_MIN,UV_MAX)) in which
@@ -2886,7 +2886,7 @@ PP(pp_int)
if (!tsv)
break;
if (SvROK(tsv) && SvRV(tsv) == SvRV(sv)) {
- SETi(PTR2IV(SvRV(sv)));
+ SETu(PTR2UV(SvRV(sv)));
RETURN;
}
else
@@ -2904,7 +2904,7 @@ PP(pp_int)
SETi(iv);
}
else if (SvROK(sv)) {
- SETi(iv);
+ SETu(PTR2UV(SvRV(sv)));
}
else {
const NV value = SvNV(sv);