Update of /cvsroot/sbcl/sbcl/tests
In directory sfp-cvsdas-3.v30.ch3.sourceforge.com:/tmp/cvs-serv26634/tests
Modified Files:
packages.impure.lisp
Log Message:
1.0.39.2: Fix symbol-name-conflict resolution test from 1.0.39.1.
* Before signalling a name-conflict in IMPORT due to a symbol found
previously on the arglist, remove the earlier symbol from the list of
symbols to add to the package (one or the other will be shadowing-imported,
and there's no further check for name collision.
Index: packages.impure.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/tests/packages.impure.lisp,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- packages.impure.lisp 30 May 2010 00:32:12 -0000 1.11
+++ packages.impure.lisp 30 May 2010 00:40:34 -0000 1.12
@@ -248,7 +248,7 @@
;;; Make sure that resolving a name-conflict in IMPORT doesn't leave
;;; multiple symbols of the same name in the package (this particular
;;; scenario found in 1.0.38.9, but clearly a longstanding issue).
-(with-test (:name import-conflict-resolution :fails-on :sbcl)
+(with-test (:name import-conflict-resolution)
(with-packages (("FOO" (:export "NIL"))
("BAR" (:use)))
(with-name-conflict-resolution ((sym "FOO" "NIL"))
|