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