Define `equal?' for pointer objects.
authorLudovic Courtès <ludo@gnu.org>
Thu, 23 Sep 2010 08:55:24 +0000 (10:55 +0200)
committerLudovic Courtès <ludo@gnu.org>
Thu, 23 Sep 2010 19:55:21 +0000 (21:55 +0200)
commitcb2d8076effd1b3f0a01a7148af5a97b64f4c29d
tree36b07bd16ef8d83fbcf40ca67141d8402617ac56
parentfb5c4dc52337603e7526a1f944533ce8217a9e29
Define `equal?' for pointer objects.

* libguile/eq.c (scm_equal_p): Handle pointer objects.

* test-suite/tests/foreign.test ("make-pointer")["equal?", "equal?
  modulo finalizer", "not equal?"]: New tests.
libguile/eq.c
test-suite/tests/foreign.test