This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
locale.c: White-space only
authorKarl Williamson <khw@cpan.org>
Sun, 10 Apr 2016 02:36:01 +0000 (20:36 -0600)
committerKarl Williamson <khw@cpan.org>
Tue, 24 May 2016 16:26:29 +0000 (10:26 -0600)
Outdent and reflow because the previous commit removed an enclosing
block.

locale.c

index 1806132..55e43b3 100644 (file)
--- a/locale.c
+++ b/locale.c
@@ -1441,28 +1441,27 @@ Perl_mem_collxfrm(pTHX_ const char *input_string,
 
     /* Then the transformation of the input.  We loop until successful, or we
      * give up */
 
     /* Then the transformation of the input.  We loop until successful, or we
      * give up */
-       for (;;) {
-            STRLEN xused = strxfrm(xbuf + xout, s, xAlloc - xout);
-
-            /* If the transformed string occupies less space than we told
-             * strxfrm() was available, it means it successfully transformed
-             * the whole string. */
-           if (xused < xAlloc - xout) {
-                xout += xused;
-               break;
-            }
+    for (;;) {
+        STRLEN xused = strxfrm(xbuf + xout, s, xAlloc - xout);
+
+        /* If the transformed string occupies less space than we told strxfrm()
+         * was available, it means it successfully transformed the whole
+         * string. */
+        if (xused < xAlloc - xout) {
+            xout += xused;
+            break;
+        }
 
 
-           if (UNLIKELY(xused >= PERL_INT_MAX))
-               goto bad;
+        if (UNLIKELY(xused >= PERL_INT_MAX))
+            goto bad;
 
 
-            /* Otherwise it should be that the transformation stopped in the
-             * middle because it ran out of space.  Malloc more, and try again.
-             * */
-           xAlloc = (2 * xAlloc) + 1;
-           Renew(xbuf, xAlloc, char);
-           if (UNLIKELY(! xbuf))
-               goto bad;
-       }
+        /* Otherwise it should be that the transformation stopped in the middle
+         * because it ran out of space.  Malloc more, and try again.  */
+        xAlloc = (2 * xAlloc) + 1;
+        Renew(xbuf, xAlloc, char);
+        if (UNLIKELY(! xbuf))
+            goto bad;
+    }
 
     *xlen = xout - sizeof(PL_collation_ix);
 
 
     *xlen = xout - sizeof(PL_collation_ix);