Skip to content
Snippets Groups Projects
Commit 13e142c1 authored by ram's avatar ram
Browse files

Strengthened the type on SSET-ELEMENT-NUMBER to (or index null) so that

we don't do generic arithmetic
parent 3456daef
No related branches found
No related tags found
No related merge requests found
...@@ -23,7 +23,7 @@ ...@@ -23,7 +23,7 @@
;;; operations.) ;;; operations.)
;;; ;;;
(defstruct sset-element (defstruct sset-element
(number nil :type (or unsigned-byte null))) (number nil :type (or index null)))
(defstruct (sset (:constructor make-sset ()) (defstruct (sset (:constructor make-sset ())
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment