Re: Problem with position and find (cl)

[Thierry Volpiatto <thierry.volpiatto@gmail.com>]

Florian Beck <abstraktion@t-online.de> writes:

> Thierry Volpiatto <thierry.volpiatto@gmail.com> writes:
>
>
>> position default test is 'eq, try 'equal
>
> Indeed, many cl-tests default to 'eq.
>
> BTW, what is the reason for this (apart from being a language convention)?
>
> When I try
>
> (let ((start-time (current-time)))
>   (dotimes (i 1000000)
>     (position '(1) '((2) (5) (2) 2 x  4 fer fer f r e wqf (1) fr r) :test 'eq))
>   (format-time-string "%S" (time-since start-time)))
>
> with 'eq and 'equal I get the same result. So 'eq is not more efficent,
> is it?
eq compare two objects and say if they are the same.
equal compare two objects and say if the value of these object is the
same.

,----
| ELISP> (setq A '(1 2))
| (1 2)
| 
| ELISP> (setq B '(1 2))
| (1 2)
| 
| ELISP> (eq A B)
| nil
| ELISP> (equal A B)
| t
`----

-- 
A + Thierry
Pub key: http://pgp.mit.edu