This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
op.c: balance braces in #if 0 section
authorHugo van der Sanden <hv@crypt.org>
Sat, 1 Feb 2020 12:11:07 +0000 (12:11 +0000)
committerHugo van der Sanden <hv@crypt.org>
Sat, 1 Feb 2020 12:12:16 +0000 (12:12 +0000)
Balance the braces so we can bounce to matching braces for the rest
of S_pmtrans.

op.c

diff --git a/op.c b/op.c
index 2d295a9..f5f61c7 100644 (file)
--- a/op.c
+++ b/op.c
@@ -7852,6 +7852,7 @@ S_pmtrans(pTHX_ OP *o, OP *expr, OP *repl)
         }
         else {
             /* no more replacement chars than search chars */
+        }
 #endif
 
     }