Skip to content

Commit bff6937

Browse files
committed
op.c: Change a -Dy line to yv; and another vice versa
While debugging this code, I found that the final generated map was unneeded and too large for most instances; so change that to not be output without the verbose option. Conversely, I found that I needed to often see the state of things after the first pass, so change to make that not verbose.
1 parent 682fe13 commit bff6937

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

op.c

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -6684,7 +6684,7 @@ S_pmtrans(pTHX_ OP *o, OP *expr, OP *repl)
66846684
for (pass2 = 0; pass2 < 2; pass2++) {
66856685
if (pass2) {
66866686

6687-
DEBUG_yv(PerlIO_printf(Perl_debug_log, "After pass1: \n");
6687+
DEBUG_y(PerlIO_printf(Perl_debug_log, "After pass1: \n");
66886688
invmap_dump(t_invlist, r_map));
66896689

66906690
/* In the second pass, we start with a single range */
@@ -6817,7 +6817,7 @@ S_pmtrans(pTHX_ OP *o, OP *expr, OP *repl)
68176817
r_range_count = t_range_count;
68186818

68196819
#ifdef DEBUGGING
6820-
if (DEBUG_y_TEST && ! del) {
6820+
if (DEBUG_yv_TEST && ! del) {
68216821
PerlIO_printf(Perl_debug_log,
68226822
"final_map = %" UVXf "\n", final_map);
68236823
}

0 commit comments

Comments
 (0)