From 13e142c18a0437ee1c2bd66966dd2cdf3ada7a13 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Sat, 6 Oct 1990 18:22:19 +0000
Subject: [PATCH] Strengthened the type on SSET-ELEMENT-NUMBER to (or index
 null) so that we don't do generic arithmetic

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

diff --git a/compiler/sset.lisp b/compiler/sset.lisp
index a703973bc..a79d3c8f2 100644
--- a/compiler/sset.lisp
+++ b/compiler/sset.lisp
@@ -23,7 +23,7 @@
 ;;; operations.)
 ;;;
 (defstruct sset-element
-  (number nil :type (or unsigned-byte null)))
+  (number nil :type (or index null)))
 
 
 (defstruct (sset (:constructor make-sset ())
-- 
GitLab