diff --git a/src/Compiler/Parse/Symbol.elm b/src/Compiler/Parse/Symbol.elm index 21a090ea7..803814d27 100644 --- a/src/Compiler/Parse/Symbol.elm +++ b/src/Compiler/Parse/Symbol.elm @@ -69,23 +69,13 @@ operator toExpectation toError = chompOps : String -> Int -> Int -> Int chompOps src pos end = - if pos < end && isBinopChar src pos then + if pos < end && isBinopCharHelp (P.unsafeIndex src pos) then chompOps src (pos + 1) end else pos -isBinopChar : String -> Int -> Bool -isBinopChar src pos = - src - |> String.dropLeft pos - |> String.toList - |> List.head - |> Maybe.map isBinopCharHelp - |> Maybe.withDefault False - - isBinopCharHelp : Char -> Bool isBinopCharHelp char = let