Remove unnecessary code from pp_eq

This code, added recently in 7d779b2, has been unnecessary since com-
mit 75ea7a1.

diff --git a/pp_hot.c b/pp_hot.c
index b6b8851..06b837b 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -342,18 +342,6 @@ PP(pp_eq)
        RETURN;
     }
 #endif
-    if (TOPs == TOPm1s && SvGMAGICAL(TOPs)) {
-       SV * const svl = sv_newmortal();
-       /* Print the uninitialized warning now, so it includes the vari-
-          able name. */
-       if (!SvOK(TOPs)) {
-           if (ckWARN(WARN_UNINITIALIZED)) report_uninit(TOPs);
-           sv_setiv(svl,0);
-       }
-       else sv_setsv_flags(svl, TOPs, 0);
-       SvGETMAGIC(TOPs);
-       TOPm1s = svl;
-    }
 #ifdef PERL_PRESERVE_IVUV
     SvIV_please_nomg(TOPs);
     if (SvIOK(TOPs)) {