From 4effb9bd4b5c0d7c989457635d85bf56ab1bd0f2 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Mon, 7 May 1990 10:57:24 +0000
Subject: [PATCH] Fixed broken slot type declaration in the UNDEFINED-WARNING
 structure.

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

diff --git a/compiler/node.lisp b/compiler/node.lisp
index cfa7ece3b..0df734591 100644
--- a/compiler/node.lisp
+++ b/compiler/node.lisp
@@ -1159,7 +1159,7 @@
   (name nil :type (or symbol list))
   ;;
   ;; The kind of reference to Name.
-  (kind nil :type (or :function :type))
+  (kind nil :type (member :function :type))
   ;;
   ;; The number of times this thing was used.
   (count 0 :type unsigned-byte)
-- 
GitLab