Revert change #33676, likely to break atan(-0,0) on some platforms

p4raw-link: @33676 on //depot/perl: 9d6bff35783dc768c5d72663e6e2d31769c5da91

p4raw-id: //depot/perl@33678

1 files changed, 1 insertions, 4 deletions

diff --git a/pp.c b/pp.c
index 145e74cd15..d940d104c1 100644
--- a/pp.c
+++ b/pp.c
@@ -2798,10 +2798,7 @@ PP(pp_atan2)
     dVAR; dSP; dTARGET; tryAMAGICbin(atan2,0);
     {
       dPOPTOPnnrl;
-      if (left == 0.0 && right == 0.0)
-	  SETs(&PL_sv_undef);
-      else
-	  SETn(Perl_atan2(left, right));
+      SETn(Perl_atan2(left, right));
       RETURN;
     }
 }