From 29652e44850cf99ab62db1f3f287f6183ce65a82 Mon Sep 17 00:00:00 2001
From: Richard Viney <richard.viney@heartlab.com>
Date: Thu, 1 Feb 2024 09:55:13 +1300
Subject: Switch to string accumulator

---
 src/gleam/bit_array.gleam | 39 ++++++++++++++-------------------------
 1 file changed, 14 insertions(+), 25 deletions(-)

(limited to 'src')

diff --git a/src/gleam/bit_array.gleam b/src/gleam/bit_array.gleam
index 97c33b9..4a2e7bb 100644
--- a/src/gleam/bit_array.gleam
+++ b/src/gleam/bit_array.gleam
@@ -2,7 +2,6 @@
 
 import gleam/int
 import gleam/string
-import gleam/string_builder.{type StringBuilder}
 
 /// Converts a UTF-8 `String` type into a `BitArray`.
 ///
@@ -171,24 +170,20 @@ pub fn base16_decode(input: String) -> Result(BitArray, Nil)
 /// ```
 /// 
 pub fn inspect(input: BitArray) -> String {
-  string_builder.new()
-  |> string_builder.append("<<")
-  |> do_inspect(input)
-  |> string_builder.append(">>")
-  |> string_builder.to_string
+  do_inspect(input, "<<") <> ">>"
 }
 
-fn do_inspect(builder: StringBuilder, input: BitArray) -> StringBuilder {
+fn do_inspect(input: BitArray, accumulator: String) -> String {
   case input {
-    <<>> -> builder
+    <<>> -> accumulator
 
-    <<x:size(1)>> -> do_inspect_int(builder, x, ":size(1)")
-    <<x:size(2)>> -> do_inspect_int(builder, x, ":size(2)")
-    <<x:size(3)>> -> do_inspect_int(builder, x, ":size(3)")
-    <<x:size(4)>> -> do_inspect_int(builder, x, ":size(4)")
-    <<x:size(5)>> -> do_inspect_int(builder, x, ":size(5)")
-    <<x:size(6)>> -> do_inspect_int(builder, x, ":size(6)")
-    <<x:size(7)>> -> do_inspect_int(builder, x, ":size(7)")
+    <<x:size(1)>> -> accumulator <> int.to_string(x) <> ":size(1)"
+    <<x:size(2)>> -> accumulator <> int.to_string(x) <> ":size(2)"
+    <<x:size(3)>> -> accumulator <> int.to_string(x) <> ":size(3)"
+    <<x:size(4)>> -> accumulator <> int.to_string(x) <> ":size(4)"
+    <<x:size(5)>> -> accumulator <> int.to_string(x) <> ":size(5)"
+    <<x:size(6)>> -> accumulator <> int.to_string(x) <> ":size(6)"
+    <<x:size(7)>> -> accumulator <> int.to_string(x) <> ":size(7)"
 
     <<x, rest:bits>> -> {
       let suffix = case rest {
@@ -196,17 +191,11 @@ fn do_inspect(builder: StringBuilder, input: BitArray) -> StringBuilder {
         _ -> ", "
       }
 
-      builder
-      |> do_inspect_int(x, suffix)
-      |> do_inspect(rest)
+      let accumulator = accumulator <> int.to_string(x) <> suffix
+
+      do_inspect(rest, accumulator)
     }
 
-    _ -> builder
+    _ -> accumulator
   }
 }
-
-fn do_inspect_int(builder: StringBuilder, value: Int, suffix: String) {
-  builder
-  |> string_builder.append(int.to_string(value))
-  |> string_builder.append(suffix)
-}
-- 
cgit v1.2.3