Mercurial > hg > xemacs-beta

comparison tests/automated/hash-table-tests.el @ 5118:e0db3c197671 ben-lisp-object

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge up to latest default branch, doesn't compile yet
author Ben Wing <ben@xemacs.org>
date Sat, 26 Dec 2009 21:18:49 -0600
parents 479443c0f95a
children 189fb67ca31a
comparison
equal deleted inserted replaced
5117:3742ea8250b5 5118:e0db3c197671
279 ) 279 )
280 280
281 ;;; Test sxhash 281 ;;; Test sxhash
282 (Assert (= (sxhash "foo") (sxhash "foo"))) 282 (Assert (= (sxhash "foo") (sxhash "foo")))
283 (Assert (= (sxhash '(1 2 3)) (sxhash '(1 2 3)))) 283 (Assert (= (sxhash '(1 2 3)) (sxhash '(1 2 3))))
284 (Assert (/= (sxhash '(1 2 3)) (sxhash '(3 2 1))))