diff --git a/src/Visp.Compiler/Syntax/SynWriter.fs b/src/Visp.Compiler/Syntax/SynWriter.fs index f013d25..ac2a938 100644 --- a/src/Visp.Compiler/Syntax/SynWriter.fs +++ b/src/Visp.Compiler/Syntax/SynWriter.fs @@ -163,7 +163,8 @@ module Write = let reservedWords = - [ "fun"; "then"; "done"; "val"; "end"; "begin"; "mod"; "to"; "with" ] |> Set.ofList + [ "fun"; "then"; "done"; "val"; "end"; "begin"; "mod"; "to"; "with" ] + |> Set.ofList let escapableChars = [ '?'; '-'; '+'; '*'; '/'; '!'; ':' ] |> Set.ofList