diff options
author | Karl Williamson <khw@cpan.org> | 2017-12-19 16:03:57 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2018-01-19 11:20:11 -0700 |
commit | 78ba90076f5958f9830fb2559e21420018be4f8d (patch) | |
tree | 08ebdc61190a0e14669b79f33aa308179882acaa /doop.c | |
parent | 13a9ab3be5c555b11bc45b0c5ef180adedc80950 (diff) | |
download | perl-78ba90076f5958f9830fb2559e21420018be4f8d.tar.gz |
doop.c: Use MIN()
This is slightly cleaner than hand rolling the min.
Diffstat (limited to 'doop.c')
-rw-r--r-- | doop.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1108,7 +1108,7 @@ Perl_do_vop(pTHX_ I32 optype, SV *sv, SV *left, SV *right) len = leftlen; } else { /* Neither is UTF-8 */ - len = leftlen < rightlen ? leftlen : rightlen; + len = MIN(leftlen, rightlen); } lensave = len; |