       { :halt, value } ->
         send receiver, {:halt, value}
       { index, line } ->
-        lex(index, String.codepoints(line), receiver, options)
+        lex(index, line, receiver, options)
         lex_into(receiver, options)
     end
   end

    end
  end

  defp lex(index, [@carriage_return | tail], receiver, current_token, separator) do
    case current_token do
      {:delimiter, value} -> lex(index, tail, {:delimiter, receiver, value <> @carriage_return}, separator)
      _ ->

  end

  defp emit_token!(token, receiver) do
    send receiver, token
  end

end
