Global type declarations cannot be used for local functions and lambda forms with the same names.

This commit is contained in:
Juan Jose Garcia Ripoll 2012-12-18 22:19:12 +01:00
parent 6adc64d00c
commit a6d30df567

View file

@ -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)