[Openmcl-devel] Eq definition

[Mathieu Suen]

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