s(:id, bytes(<<0x01>>))

            s(:id, bytes(<<0x01>>)),
            &u32/1,
            s(:content, &get_bytes/1)

          {:pop_and_cont, cont} ->
            [top | acc] = state.acc
            cont = cont.(top)
            {%{state | parsers: [cont | state.parsers], acc: acc}, chunk}

      ]
    end
  end
  defp u32(<<0::1, _::7, rest::binary>> = chunk) do
    <<val::binary-size(1), _::binary>> = chunk
    [
      {:add_acc, WaParser.LEB128.decode_unsigned(val), rest}
    ]
  end
  defp get_bytes(_chunk) do
    [
      {:pop_and_cont, &read_bytes/1}
    ]
  end
  defp read_bytes(count) do
    fn <<bytes::binary-size(count), rest::binary>> ->
      [
        {:add_acc, bytes, rest}