showLispVal (MakeClosure args expr freevars) = "(make-closure (" ++ initSafe (concatMap (++ " ") args) ++ ") " ++ show expr ++ " [" ++ initSafe (concatMap (++ " ") freevars) ++ "])"
showLispVal (MakeClosure args expr freevars) = "(make-closure (" ++ initSafe (concatMap (++ " ") args) ++ ") " ++ show expr ++ " [" ++ initSafe (concatMap (++ " ") freevars) ++ "])"
showLispVal (MakeClosure args expr freevars) = "(make-closure (" ++ initSafe (concatMap (++ " ") args) ++ ") " ++ show expr ++ " [" ++ initSafe (concatMap (++ " ") freevars) ++ "])"