Value.to_string: "symbol" -> "#"
This commit is contained in:
parent
de0d7bc009
commit
8c029cd0d8
1 changed files with 1 additions and 1 deletions
2
eval.ml
2
eval.ml
|
@ -56,7 +56,7 @@ module Value = struct
|
||||||
| Float n -> string_of_float n
|
| Float n -> string_of_float n
|
||||||
| Bool b -> string_of_bool b
|
| Bool b -> string_of_bool b
|
||||||
| String s -> "\"" ^ s ^ "\""
|
| String s -> "\"" ^ s ^ "\""
|
||||||
| Symbol s -> "symbol " ^ s
|
| Symbol s -> "#" ^ s
|
||||||
| Function _ -> "<fun>"
|
| Function _ -> "<fun>"
|
||||||
| External f -> "external " ^ f
|
| External f -> "external " ^ f
|
||||||
| Nop -> "nop"
|
| Nop -> "nop"
|
||||||
|
|
Loading…
Add table
Reference in a new issue