This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regcomp.c: White-space only, wrap comment to fit
authorKarl Williamson <public@khwilliamson.com>
Sun, 7 Apr 2013 03:03:44 +0000 (21:03 -0600)
committerKarl Williamson <public@khwilliamson.com>
Mon, 20 May 2013 14:59:13 +0000 (08:59 -0600)
regcomp.c

index 53268fd..1a1cd1c 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -2838,7 +2838,8 @@ S_join_exact(pTHX_ RExC_state_t *pRExC_state, regnode *scan, UV *min_subtract, b
                     OP(scan) = EXACTFU_SS;
                     s += 2;
                 }
                     OP(scan) = EXACTFU_SS;
                     s += 2;
                 }
-                else if (len == 6   /* len is the same in both ASCII and EBCDIC for these */
+                else if (len == 6   /* len is the same in both ASCII and EBCDIC
+                                       for these */
                          && (memEQ(s, GREEK_SMALL_LETTER_IOTA_UTF8
                                       COMBINING_DIAERESIS_UTF8
                                       COMBINING_ACUTE_ACCENT_UTF8,
                          && (memEQ(s, GREEK_SMALL_LETTER_IOTA_UTF8
                                       COMBINING_DIAERESIS_UTF8
                                       COMBINING_ACUTE_ACCENT_UTF8,