Change 28534 by [EMAIL PROTECTED] on 2006/07/10 18:17:30
Silence empty if-statement warning.
Affected files ...
... //depot/perl/universal.c#148 edit
Differences ...
==== //depot/perl/universal.c#148 (text) ====
Index: perl/universal.c
--- perl/universal.c#147~28477~ 2006-07-04 05:04:58.000000000 -0700
+++ perl/universal.c 2006-07-10 11:17:30.000000000 -0700
@@ -69,9 +69,11 @@
SV** const svp = (SV**)hv_fetch(hv, name, len, FALSE);
if (svp) {
SV * const sv = *svp;
+#ifdef DEBUGGING
if (sv != &PL_sv_undef)
DEBUG_o( Perl_deb(aTHX_ "Using cached ISA %s for package
%s\n",
name, hvname) );
+#endif
return (sv == &PL_sv_yes);
}
}
End of Patch.
