[Openmcl-devel] Eq definition

[Milan Jovanovic]

Try with different safety/speed settings and you will see the  
difference.

On Mar 2, 2010, at 11:12 PM, Mathieu Suen wrote:

> On Mar 2, 2010, at 10:40 PM, Gary Byers wrote:
>>
>> On Tue, 2 Mar 2010, Mathieu Suen wrote:
>>
>>> Hi,
>>>
>>> I read the source code of the eq function and find it quite odd:
>>>
>>> (defun eq (x y)
>>> "Return T if OBJ1 and OBJ2 are the same object, otherwise NIL."
>>> (eq x y))
>>> ;; /level-0/l0-pred.lisp
>>>
>>> Is it because it's a primitive?
>>
>> Yes.
>>
>> For extra credit: try to define EQ in lisp without depending on
>> the compiler to open-code EQ, e.g. :
>>
>> (declaim (notinline eq))
>>
>> (defun eq (x y)
>> ;;; ????
>> )
>>
>> (This is a koan; if you think about it long enough, you'll either
>> achieve enlightenment or get a bad headache.)
>>
>
> :)
> I guess that code never get interpreted so what is the purpose of it?
>
>>
>>>
>>> Thanks
>>> 	Mth
>>>
>
>
> 	
>
> 	
> 		
> ___________________________________________________________________________
> Yahoo! Mail réinvente le mail ! Découvrez le nouveau Yahoo! Mail et  
> son interface révolutionnaire.
> http://fr.mail.yahoo.com
> _______________________________________________
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel