X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Ffndb.lisp;h=e666a3d0f8d3e3a7559331fdabb5c6773413a160;hb=30d61cc04481c081fd97c42561475bfe11209b59;hp=4f04dd34741c1e17886fc8210b5e4fb5bb6a6b92;hpb=ebe41eb91248cbe3accc890929ddd21827a933d0;p=sbcl.git diff --git a/src/compiler/fndb.lisp b/src/compiler/fndb.lisp index 4f04dd3..e666a3d 100644 --- a/src/compiler/fndb.lisp +++ b/src/compiler/fndb.lisp @@ -813,10 +813,8 @@ (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!xc:most-positive-fixnum) - (#-sb-xc-host foldable flushable)) -(defknown psxhash (t &optional t) (integer 0 #.sb!xc:most-positive-fixnum) - (#-sb-xc-host foldable flushable)) +(defknown sxhash (t) hash (#-sb-xc-host foldable flushable)) +(defknown psxhash (t &optional t) hash (#-sb-xc-host foldable flushable)) ;;;; from the "Arrays" chapter