1 files changed, 1 insertions, 4 deletions
diff --git a/pp.c b/pp.c
index d0df828363..8054e7da11 100644
--- a/pp.c
+++ b/pp.c
@@ -3057,10 +3057,7 @@ PP(pp_abs)
         }
       } else{
         const NV value = SvNV_nomg(sv);
-        if (value < 0.0)
-          SETn(-value);
-        else
-          SETn(value);
+        SETn(Perl_fabs(value));
       }
     }
     return NORMAL;