From d9a7ebb50c4ce0ad589e4bf760edb76df06b1fb8 Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Mon, 24 Jan 2011 22:23:23 +0100 Subject: [PATCH] Fixed typo in error message from LOCAL-FUNCION-REF (J. James). --- src/cmp/cmpflet.lsp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cmp/cmpflet.lsp b/src/cmp/cmpflet.lsp index a5c16eb9b..f9672733b 100644 --- a/src/cmp/cmpflet.lsp +++ b/src/cmp/cmpflet.lsp @@ -238,7 +238,7 @@ (when (functionp fun) (when build-object ;; Macro definition appears in #'.... This should not happen. - (cmperr "The name of a macro ~A was found in special form FUNCTION." name)) + (cmperr "The name of a macro ~A was found in special form FUNCTION." fname)) (return-from local-function-ref nil)) (incf (fun-ref fun)) (cond (build-object