diff --git a/compiler/globaldb.lisp b/compiler/globaldb.lisp index 2f791bd4a8e1bdc789aecdb42feb4546245fe999..5bdfde42d0a3ac0c3efa5043ddad18dff9c2f0fd 100644 --- a/compiler/globaldb.lisp +++ b/compiler/globaldb.lisp @@ -1020,7 +1020,7 @@ (define-info-type type expander (or function null) nil) ;;; Print function for a type. -(define-info-type type printer (or function null) nil) +(define-info-type type printer (or function symbol null) nil) ;;; Defstruct description information for a structure type. DEFINED is the ;;; current global definition, and is not shadowed by compilation of