bug#22729: 25.0.50; cl-union ignores :test when lists are equal

[Lars Ingebrigtsen]

Nicolas Richard <youngfrog@members.fsf.org> writes:

> Lars Ingebrigtsen <larsi@gnus.org> writes:
>> And that's because the two "foo" strings are eql here.  Apparently the
>> Emacs reader is being clever...
>
> I'm surprised because it didn't fail for me.
>
> As a test, this:
>     emacs --batch -Q --eval '(let ((str1 "foo") (str2 "foo")) (message
> "%S" (eql str1 str2)))'
> returns nil for me.

I was surprised, too, but in the ert test the two strings were
definitely eql.  Perhaps ert byte-compiles the functions, and the byte
compiler is doing the clever string thing?

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no