From a6d30df567ae463d5b0c471b59f38aed52a7c900 Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Tue, 18 Dec 2012 22:19:12 +0100 Subject: [PATCH] Global type declarations cannot be used for local functions and lambda forms with the same names. --- src/cmp/cmptype.lsp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cmp/cmptype.lsp b/src/cmp/cmptype.lsp index d362a4603..dc3525fb4 100644 --- a/src/cmp/cmptype.lsp +++ b/src/cmp/cmptype.lsp @@ -59,7 +59,7 @@ (defun lambda-type-check-associate (fname requireds optionals keywords global-fun-p) (multiple-value-bind (arg-types found) - (get-arg-types fname *cmp-env* global-fun-p) + (and global-fun-p (get-arg-types fname *cmp-env* global-fun-p)) (if found (multiple-value-bind (req-types opt-types rest-flag key-flag key-types allow-other-keys)