Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
10 lines (8 sloc) 339 Bytes
(in-package :dict)
(locally
(declare #.*muffle-note*
#.*fastest*)
(define-test eq #+SBCL sb-impl::eq-hash #-SBCL sxhash eq)
(define-test eql #+SBCL sb-impl::eql-hash #-SBCL sxhash eql)
(define-test equal #+SBCL sb-impl::equal-hash #-SBCL sxhash equal)
(define-test equalp #+SBCL sb-impl::equalp-hash #-SBCL sxhash equalp))
Jump to Line
Something went wrong with that request. Please try again.