diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Parser/Core.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Parser/Core.hs b/src/Parser/Core.hs index c982319..78fc666 100644 --- a/src/Parser/Core.hs +++ b/src/Parser/Core.hs @@ -422,7 +422,7 @@ osymbol str = void $ try $ (string (TL.pack str) <* notFollowedBy operatorChar) wsymbol str = void $ try $ (string (TL.pack str) <* notFollowedBy wordChar) <* sc operatorChar :: (MonadParsec e s m, Token s ~ Char) => m (Token s) -operatorChar = satisfy $ (`elem` [ '.', '+', '-', '*', '/', '=', '<', '>', '|' ]) +operatorChar = satisfy $ (`elem` [ '!', '%', '&', '*', '+', '-', '.', '/', ':', '<', '=', '>', '?', '@', '^', '|', '~' ]) {-# INLINE operatorChar #-} localState :: TestParser a -> TestParser a |