diff --git a/compiler/ctype.lisp b/compiler/ctype.lisp index fd1930a393560ac4a459db4db2781faf3803e0d4..0964295d9e7135e23885f35de1b300672dee6cd7 100644 --- a/compiler/ctype.lisp +++ b/compiler/ctype.lisp @@ -5,7 +5,7 @@ ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ctype.lisp,v 1.37 2010/04/20 17:57:46 rtoy Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ctype.lisp,v 1.38 2010/05/27 23:43:16 rtoy Rel $") ;;; ;;; ********************************************************************** ;;; @@ -667,7 +667,7 @@ (intl:ngettext "Definition has ~R ~A arg, but ~A has ~R." "Definition has ~R ~A args, but ~A has ~R." x) - x what x where y)))) + x what where y)))) ;; TRANSLATORS: Usage is "Definition has <n> FIXED args but <where> <m>" ;; TRANSLATORS: Translate FIXED above appropriately. (frob min (length req) (intl:gettext "fixed"))