From 4e337cb294798d68431c3685b7ab490b337682cc Mon Sep 17 00:00:00 2001
From: chinarulezzz <alexandr.savca89@gmail.com>
Date: Fri, 20 Apr 2018 20:54:12 +0300
Subject: [PATCH] {op, pp, regcomp}.c: fix missing parentheses in 'if'
 statement

---
 op.c      | 2 +-
 pp.c      | 2 +-
 regcomp.c | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/op.c b/op.c
index a05a1319d4..d5b17f4a5b 100644
--- a/op.c
+++ b/op.c
@@ -10351,7 +10351,7 @@ S_process_special_blocks(pTHX_ I32 floor, const char *const fullname,
 	    return FALSE;
     } else {
 	if (*name == 'E') {
-	    if strEQ(name, "END") {
+	    if (strEQ(name, "END")) {
 		DEBUG_x( dump_sub(gv) );
 		Perl_av_create_and_unshift_one(aTHX_ &PL_endav, MUTABLE_SV(cv));
 	    } else
diff --git a/pp.c b/pp.c
index d777ae4309..6c42cfe5db 100644
--- a/pp.c
+++ b/pp.c
@@ -4541,7 +4541,7 @@ PP(pp_fc)
                     for (; s < send; s++) {
                         STRLEN ulen;
                         UV fc = _to_uni_fold_flags(*s, tmpbuf, &ulen, flags);
-                        if UVCHR_IS_INVARIANT(fc) {
+                        if (UVCHR_IS_INVARIANT(fc)) {
                             if (full_folding
                                 && *s == LATIN_SMALL_LETTER_SHARP_S)
                             {
diff --git a/regcomp.c b/regcomp.c
index 800ab2d444..fe11aa6c1b 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -17502,7 +17502,7 @@ S_regclass(pTHX_ RExC_state_t *pRExC_state, I32 *flagp, U32 depth,
                            literal
                         );
                 }
-                else if isMNEMONIC_CNTRL(value) {
+                else if (isMNEMONIC_CNTRL(value)) {
                     vWARN4(RExC_parse,
                            "\"%.*s\" is more clearly written simply as \"%s\"",
                            (int) (RExC_parse - rangebegin),
-- 
2.15.1