hash-sets: simplify <hash-set>.

db4
John Benediktsson 2014-01-08 09:55:45 -08:00
parent 63514bbbf8
commit 8c07160aa9
1 changed files with 1 additions and 1 deletions

View File

@ -87,7 +87,7 @@ TUPLE: hash-set
PRIVATE> PRIVATE>
: <hash-set> ( capacity -- hash-set ) : <hash-set> ( capacity -- hash-set )
hash-set new [ reset-hash ] keep ; inline [ 0 0 ] dip <hash-array> hash-set boa ; inline
M: hash-set in? M: hash-set in?
key@ 2nip ; key@ 2nip ;