(foldable flushable))
(defknown hash-table-size (hash-table) index (flushable))
(defknown hash-table-test (hash-table) symbol (foldable flushable))
-(defknown sxhash (t) (integer 0 #.sb!vm:*target-most-positive-fixnum*)
+(defknown sxhash (t) (integer 0 #.sb!xc:most-positive-fixnum)
(foldable flushable))
\f
;;;; from the "Arrays" chapter
(character character callable &optional readtable) function
(unsafe))
(defknown get-dispatch-macro-character
- (character character &optional (or readtable null)) callable
- (flushable))
+ (character character &optional (or readtable null)) (or callable null)
+ ())
;;; may return any type due to eof-value...
(defknown (read read-preserving-whitespace read-char-no-hang read-char)
\f
;;;; from the "Errors" chapter:
-(defknown error (t &rest t) nil) ; never returns...
+(defknown error (t &rest t) nil) ; never returns
(defknown cerror (string t &rest t) null)
(defknown warn (t &rest t) null)
(defknown break (&optional t &rest t) null)
+
+;;; and analogous SBCL extension:
+(defknown bug (t &rest t) nil) ; never returns
\f
;;;; from the "Miscellaneous" Chapter:
(t sequence t index sequence-end function function)
(values t (or index null))
(flushable call))
-(defknown %find-position-if
+(defknown (%find-position-if %find-position-if-not)
(function sequence t index sequence-end function)
(values t (or index null))
(call))