summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorDominic Dunlop <domo@computer.org>2005-08-06 19:47:40 +0200
committerH.Merijn Brand <h.m.brand@xs4all.nl>2005-08-06 15:54:55 +0000
commita4474c9e1dfa634c058e348a6590af8b9ec4518e (patch)
treed41daa06af2b95627249c5b520fcc4c89c778e41 /pp.c
parent755b3d5da747d89ebed76d5b58086a4d05d10ace (diff)
downloadperl-a4474c9e1dfa634c058e348a6590af8b9ec4518e.tar.gz
Re: [PATCH] Re: [perl #36819] perlbug AutoReply: Bleadperl: abs() busted outside integer range
Message-Id: <EF62D3CF-8B54-4C7B-973E-C259F487AE32@mac.com> p4raw-id: //depot/perl@25270
Diffstat (limited to 'pp.c')
-rw-r--r--pp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/pp.c b/pp.c
index be055a0309..15083bc208 100644
--- a/pp.c
+++ b/pp.c
@@ -2857,9 +2857,9 @@ PP(pp_abs)
} else{
const NV value = TOPn;
if (value < 0.0)
- SETn(value);
- else
SETn(-value);
+ else
+ SETn(value);
}
}
RETURN;