Change 30170 by [EMAIL PROTECTED] on 2007/02/08 10:16:14
Remove dead code that was emitting warnings.
Affected files ...
... //depot/perl/regcomp.c#551 edit
Differences ...
==== //depot/perl/regcomp.c#551 (text) ====
Index: perl/regcomp.c
--- perl/regcomp.c#550~30169~ 2007-02-08 00:19:24.000000000 -0800
+++ perl/regcomp.c 2007-02-08 02:16:14.000000000 -0800
@@ -4182,20 +4182,6 @@
if (has_runon)
*p++='\n';
*p=')';
-
-
- if (0)
- PerlIO_printf(Perl_debug_log,
- "RExC_precomp: %.*s\nr->precomp: %.*s\nr->wrapped:%.*s\n",
- r->prelen,
- RExC_precomp,
- r->prelen,
- r->precomp,
- r->wraplen,
- r->wrapped
- );
-
-
}
r->intflags = 0;
End of Patch.