[project @ Replaced the optional EPSILON in ARRAY-EQUAL with a TEST keyword.]
commit51963db91e1f476fc4adb4a20e5fd4ac2ce9d35b
authorThomas M. Hermann <tmh.public@gmail.com>
Wed, 4 Mar 2009 21:43:59 +0000 (4 21:43 +0000)
committerThomas M. Hermann <tmh.public@gmail.com>
Wed, 4 Mar 2009 21:43:59 +0000 (4 21:43 +0000)
treeff2be93ea1e1e331ffcd060f04f8bf107bdd3e41
parent394dbe494fefdf32a0260d8039808c0ce9e52ab9
[project @ Replaced the optional EPSILON in ARRAY-EQUAL with a TEST keyword.]

Instead of specifying an epsilon, it makes more sense to pass
ARRAY-EQUAL a test function. This was necessitated by the
implementation of SIGNIFICANT-FIGURES-EQUAL. In the process of
updating ARRAY-EQUAL, realized that DIMENSIONS-EQUAL was performing
redundant tests and could simply be replaced with EQUAL.

This change was propagated to the ELEMENT-EQUAL support function.
lisp-unit.lisp