diff options
author | Karl Williamson <khw@cpan.org> | 2022-02-12 16:13:29 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2022-03-19 23:17:51 -0600 |
commit | cf398451a5926ec75c6c5773c571b66dd670c2cb (patch) | |
tree | ae0ccf56361794e1a8d8283f5c197c7ea775ab25 /toke.c | |
parent | 72358bbed002bb654b9158224ec350252ac8716e (diff) | |
download | perl-cf398451a5926ec75c6c5773c571b66dd670c2cb.tar.gz |
toke.c: Rmv unnecessary conditionals
Cheaper to just redo a simple assignment than to test if you've already
done it and skipping it if you had.
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -11440,7 +11440,7 @@ Perl_scan_str(pTHX_ char *start, int keep_bracketed_quoted, int keep_delims, int break; } } - else if (!d_is_utf8 && !UTF8_IS_INVARIANT((U8)*s) && UTF) { + else if (! UTF8_IS_INVARIANT((U8)*s) && UTF) { d_is_utf8 = TRUE; } @@ -11474,7 +11474,7 @@ Perl_scan_str(pTHX_ char *start, int keep_bracketed_quoted, int keep_delims, int break; else if (*(U8 *) s == PL_multi_open) brackets++; - else if (!d_is_utf8 && !UTF8_IS_INVARIANT((U8)*s) && UTF) + else if (! UTF8_IS_INVARIANT((U8)*s) && UTF) d_is_utf8 = TRUE; *to = *s; } |