clrhash does not reset count?

Just tried around with hash-tables.
So why does the clrhash does not reset the count?
Anything wrong?

(setq table (make-hash-table :test 'equal))
#<HASHTABLE 0/211>
 (setf (gethash 'Test1 table)(list 1 2 ))
(1 2)
 (setf (gethash 'Test2 table)(list 1 3 ))
(1 3)
(maphash #'(lambda (k v)
              (format t "~A = ~A~%" k v))
              table)
TEST2 = (1 3)
TEST1 = (1 2)
NIL
(hash-table-count table)
2
 (clrhash table)
NIL
(hash-table-count table)
2


Hans-Peter



------------------------ Yahoo! Groups Sponsor ---------------------~-->
Looking for the latest Free IT White Papers?
Visit SearchNetworking.com to access over 500 white papers.
Get instant access at SearchNetworking.com Today
http://us.click.yahoo.com/8lAzoD/OLNGAA/witMAA/SyjtlB/TM
---------------------------------------------------------------------~->

To unsubscribe from this group, send an email to:
[email protected]

 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/