diff --git a/code/tty-inspect.lisp b/code/tty-inspect.lisp index 9dbe5d5b0c0773299fa1e0fcca14b065346c38ae..9afeb71ce3daabfce2e29265ebad74875473c478 100644 --- a/code/tty-inspect.lisp +++ b/code/tty-inspect.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/code/tty-inspect.lisp,v 1.15 1994/10/31 04:11:27 ram Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/tty-inspect.lisp,v 1.16 1998/03/26 13:12:31 pw Exp $") ;;; ;;; ********************************************************************** ;;; @@ -150,7 +150,7 @@ (instance (describe-instance-parts object :structure)) (function (if (kernel:funcallable-instance-p object) - (describe-instance-parts object :funcallabe-instance) + (describe-instance-parts object :funcallable-instance) (describe-function-parts object))) (vector (describe-vector-parts object)) (array (describe-array-parts object))