Make bit_array.inspect work on JS

Author: richard-viney

src/gleam/bit_array.gleam

@@ -157,6 +157,7 @@ pub fn base16_encode(input: BitArray) -> String
 @external(javascript, "../gleam_stdlib.mjs", "base16_decode")
 pub fn base16_decode(input: String) -> Result(BitArray, Nil)
 
+@target(javascript)
 /// Converts a bit array to a string containing the decimal value of each byte.
 ///
 /// ## Examples
@@ -168,12 +169,17 @@ pub fn base16_decode(input: String) -> Result(BitArray, Nil)
 /// inspect(<<100, 5:3>>)
 /// // -> "<<100, 5:size(3)>>"
 /// ```
-/// 
+///
+@external(javascript, "../gleam_stdlib.mjs", "bit_array_inspect")
+pub fn inspect(input: BitArray) -> String
+
+@target(erlang)
 pub fn inspect(input: BitArray) -> String {
   do_inspect(input, "<<") <> ">>"
 }
 
-fn do_inspect(input: BitArray, accumulator: String) -> String {
+@target(erlang)
+pub fn do_inspect(input: BitArray, accumulator: String) -> String {
   case input {
     <<>> -> accumulator
 

src/gleam_stdlib.mjs

@@ -879,3 +879,7 @@ export function base16_decode(string) {
   }
   return new Ok(new BitArray(bytes));
 }
+
+export function bit_array_inspect(bits) {
+  return `<<${[...bits.buffer].join(", ")}>>`;
+}

test/gleam/bit_array_test.gleam

@@ -289,7 +289,10 @@ pub fn inspect_test() {
 
   bit_array.inspect(<<0, 20, 0x20, 255>>)
   |> should.equal("<<0, 20, 32, 255>>")
+}
 
+@target(erlang)
+pub fn inspect_partial_bytes_test() {
   bit_array.inspect(<<4:5>>)
   |> should.equal("<<4:size(5)>>")