[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: issue COMPILED-FUNCTION-REQUIREMENTS, version 4
- To: Barry Margolin <barmar@FAFNIR.THINK.COM>
- Subject: Re: issue COMPILED-FUNCTION-REQUIREMENTS, version 4
- From: Dan L. Pierson <pierson@mist.encore.com>
- Date: Thu, 16 Mar 89 15:27:21 EST
- Cc: cl-compiler@sail.stanford.edu
- In-reply-to: Your message of Thu, 16 Mar 89 15:06:00 -0500. <19890316200608.9.BARMAR@OCCAM.THINK.COM>
Date: Thu, 16 Mar 89 15:06 EST
From: Barry Margolin <barmar@FAFNIR.THINK.COM>
Date: Thu, 16 Mar 89 12:31 EST
From: Barry Margolin <barmar@FAFNIR.THINK.COM>
Another thing I just thought of is something like:
(when (typep f '(and function (not compiled-function)))
(setq f (compile nil f)))
I don't know what it says. However, I didn't apply COMPILE to a symbol,
I applied it to NIL and a function, which means that the anonymous,
interpreted function should be compiled.
Oops, I misread your example.
Actually, now I'm also a bit confused. Since we passed the
FUNCTION-TYPE proposal, is the second argument to COMPILE supposed to be
a lambda expression or a function? Should I have said (compile nil
(source-code f)) ?
Not if you're interested in the value cell of f instead of the function cell.