diff --git a/eval.ml b/eval.ml index 7e82ca8..3984692 100644 --- a/eval.ml +++ b/eval.ml @@ -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 _ -> "" | External f -> "external " ^ f | Nop -> "nop"