From 8bb3801a5231b419d21033f57e6d28bd87acaf05 Mon Sep 17 00:00:00 2001
From: Alexander Lucas <mobotsar@pm.me>
Date: Wed, 1 Jan 2025 10:22:42 -0500
Subject: [PATCH] Fixed formatting of `CCString.rtake_while`.

---
 src/core/CCString.ml | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/core/CCString.ml b/src/core/CCString.ml
index d6bb8c62..ec87f351 100644
--- a/src/core/CCString.ml
+++ b/src/core/CCString.ml
@@ -597,9 +597,9 @@ let rtake_while f s =
   let i = ref s_len_pred in
   while !i >= 0 && f (String.unsafe_get s !i) do
     decr i
-  done ;
-  if !i < s_len_pred
-    then String.sub s (!i + 1) (s_len_pred - !i)
+  done;
+  if !i < s_len_pred then
+    String.sub s (!i + 1) (s_len_pred - !i)
   else
     ""