mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-17 06:42:18 -08:00
Code Issues Projects Releases Packages Wiki Activity

NO-APPLICABLE-METHOD now shows the types of the arguments when signalling an error.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2009-11-01 02:37:38 +01:00
parent 28e3734746
commit 41c4586f65
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/clos/fixup.lsp
View file

@ -215,10 +215,10 @@ their lambda lists ~A and ~A are not congruent."
;;; ----------------------------------------------------------------------
;;; Error messages
(defmethod no-applicable-method (gf &rest args)
(declare (ignore args))
(error "No applicable method for ~S"
(generic-function-name gf)))
(defmethod no-applicable-method (gf args)
(error "No applicable method for ~S with arguments of types~{~& ~A~}"
(generic-function-name gf)
(mapcar #'type-of args)))
(defmethod no-next-method (gf method &rest args)
(declare (ignore gf args))