bit_reader.ex

defmodule BitReader do
  def puts_bits(bits) do
    bit_string = accumulate_bits(bits)
      |> Enum.join(", ")
    IO.puts "<<#{bit_string}>>"
  end

  defp accumulate_bits(bits) do
    accumulate_bits(bits, [])
  end

  defp accumulate_bits(<<>>, bits) do
    Enum.reverse bits
  end

  defp accumulate_bits(<<bit::integer-size(1)-unit(1), rest::bits>>, acc) do
    accumulate_bits(rest, [inspect(bit) | acc])
  end
end