diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-10-16 09:16:39 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-10-17 17:04:28 -0600 |
commit | fdb34c5221c69737da3357a102fb3055d38df57b (patch) | |
tree | 5c3e8741d1dd5de5e44d8cd6ff8eeedb4a26b6b9 /pp.c | |
parent | 86510fb15deab424253c3d02df84022ab415f805 (diff) | |
download | perl-fdb34c5221c69737da3357a102fb3055d38df57b.tar.gz |
pp.c: White space only
This outdents a block to the same level as the surrounding text, and
reflows the comments to take advantage of the extra space and use fewer
lines.
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 31 |
1 files changed, 15 insertions, 16 deletions
@@ -4138,22 +4138,21 @@ PP(pp_lc) * the commit message for this comment for why there isn't any */ - if (ulen > u && (SvLEN(dest) < (min += ulen - u))) { - - /* If the eventually required minimum size outgrows - * the available space, we need to grow. */ - const UV o = d - (U8*)SvPVX_const(dest); - - /* If someone lowercases one million U+0130s we - * SvGROW() one million times. Or we could try - * guessing how much to allocate without allocating too - * much. Such is life. Another option would be to - * grow an extra byte or two more each time we need to - * grow, which would cut down the million to 500K, with - * little waste */ - SvGROW(dest, min); - d = (U8*)SvPVX(dest) + o; - } + if (ulen > u && (SvLEN(dest) < (min += ulen - u))) { + + /* If the eventually required minimum size outgrows the + * available space, we need to grow. */ + const UV o = d - (U8*)SvPVX_const(dest); + + /* If someone lowercases one million U+0130s we SvGROW() + * one million times. Or we could try guessing how much to + * allocate without allocating too much. Such is life. + * Another option would be to grow an extra byte or two + * more each time we need to grow, which would cut down the + * million to 500K, with little waste */ + SvGROW(dest, min); + d = (U8*)SvPVX(dest) + o; + } /* Copy the newly lowercased letter to the output buffer we're * building */ |