From: Karl Williamson Date: Fri, 11 Nov 2011 17:38:27 +0000 (-0700) Subject: pp.c: White-space only X-Git-Tag: accepted/trunk/20130322.191538~2161^2~7 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=8e058693c493f09b014305b8d011c3b081e9b230;p=platform%2Fupstream%2Fperl.git pp.c: White-space only This outdents and reflows comments as a result of the removal of a surrounding block --- diff --git a/pp.c b/pp.c index f58a460..9ab1b07 100644 --- a/pp.c +++ b/pp.c @@ -3878,36 +3878,36 @@ PP(pp_uc) CAT_UNI_TO_UTF8_TWO_BYTE(d, GREEK_CAPITAL_LETTER_IOTA); in_iota_subscript = FALSE; - } + } - /* Then handle the current character. Get the changed case - * value and copy it to the output buffer */ + /* Then handle the current character. Get the changed case value + * and copy it to the output buffer */ - u = UTF8SKIP(s); - uv = toUPPER_utf8(s, tmpbuf, &ulen); - if (uv == GREEK_CAPITAL_LETTER_IOTA - && utf8_to_uvchr(s, 0) == COMBINING_GREEK_YPOGEGRAMMENI) - { - in_iota_subscript = TRUE; - } - else { - 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 uppercases one million U+03B0s we - * SvGROW() one million times. Or we could try - * guessing how much to allocate without allocating too - * much. Such is life. See corresponding comment in - * lc code for another option */ - SvGROW(dest, min); - d = (U8*)SvPVX(dest) + o; - } - Copy(tmpbuf, d, ulen, U8); - d += ulen; - } - s += u; + u = UTF8SKIP(s); + uv = toUPPER_utf8(s, tmpbuf, &ulen); + if (uv == GREEK_CAPITAL_LETTER_IOTA + && utf8_to_uvchr(s, 0) == COMBINING_GREEK_YPOGEGRAMMENI) + { + in_iota_subscript = TRUE; + } + else { + 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 uppercases one million U+03B0s we SvGROW() + * one million times. Or we could try guessing how much to + * allocate without allocating too much. Such is life. + * See corresponding comment in lc code for another option + * */ + SvGROW(dest, min); + d = (U8*)SvPVX(dest) + o; + } + Copy(tmpbuf, d, ulen, U8); + d += ulen; + } + s += u; } if (in_iota_subscript) { CAT_UNI_TO_UTF8_TWO_BYTE(d, GREEK_CAPITAL_LETTER_IOTA);