Value.to_string: "symbol" -> "#"

This commit is contained in:
백현웅 2022-02-21 02:18:42 +09:00
parent de0d7bc009
commit 8c029cd0d8

View file

@ -56,7 +56,7 @@ module Value = struct
| Float n -> string_of_float n
| Bool b -> string_of_bool b
| String s -> "\"" ^ s ^ "\""
| Symbol s -> "symbol " ^ s
| Symbol s -> "#" ^ s
| Function _ -> "<fun>"
| External f -> "external " ^ f
| Nop -> "nop"