tysigd

2024-03-04 10:47:58 -07:00
parent c85c47839a
commit 156ef8d0a7
4 changed files with 40 additions and 5 deletions
--- a/src/Rlp/Lex.x
+++ b/src/Rlp/Lex.x
@@ -61,7 +61,7 @@ $asciisym       = [\!\#\$\%\&\*\+\.\/\<\=\>\?\@\\\^\|\-\~\:]
    |infixr|infixl|infix

@reservedop =
-    "=" | \\ | "->" | "|" | "::"
+    "=" | \\ | "->" | "|" | ":"

 rlp :-
    
@@ -167,7 +167,7 @@ lexReservedName = \case
 lexReservedOp :: Text -> RlpToken
 lexReservedOp = \case
    "="     -> TokenEquals
-    "::"    -> TokenHasType
+    ":"     -> TokenHasType
    "|"     -> TokenPipe
    "->"    -> TokenArrow
    s       -> error (show s)