From 1c31ddd47f132407e3a66900327905c352039de5 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Wed, 14 Feb 1990 12:47:05 +0000
Subject: [PATCH] Changed TYPE PRINTER to allow symbols.

---
 compiler/globaldb.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/globaldb.lisp b/compiler/globaldb.lisp
index 2f791bd4a..5bdfde42d 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
-- 
GitLab