feat(parser): Add more operator characters

This pulls all operators allowed in Haskell 2010

base/src/ast.rs

@@ -836,7 +836,7 @@ fn get_return_type(env: &TypeEnv, alias_type: &ArcType, arg_count: usize) -> Arc
 }
 
 pub fn is_operator_char(c: char) -> bool {
-    "#+-*/&|=<>:.@".chars().any(|x| x == c)
+    "!#$%&*+-./<=>?@\\^|-~:".chars().any(|x| x == c)
 }
 
 pub fn is_constructor(s: &str) -> bool {