Subject: Re: Is there an LISP interpreter for win 16/32 ?
From: Erik Naggum <clerik@naggum.no>
Date: 1997/08/27
Newsgroups: comp.lang.lisp
Message-ID: <3081710924204472@naggum.no>


* David Hanley
| Welcome to Allegro CL Lite for Windows
| Version: 3.0.2 Lite Release: 15-Jan-97 19:03
| Copyright (C) 1992-1997, Franz Inc., Berkeley, CA, USA.
| All rights reserved.
| Loaded Franz Inc. Patches: None.
| 
| > (defun double(x) (+ x x))
| DOUBLE
| > (compiled-function-p 'double)
| NIL
| > (compile 'double)
| DOUBLE
| > (compiled-function-p 'double)
| NIL
| >
| 
| Is there a bug in the compiled-function-p function, or is it really
| an interpreter?

the symbol `double' could never become a compiled-function no matter how
hard you tried.

this example is from ACL 4.3.1 for Unix, but you should be able to obtain
better results from following this example:

user(2): (defun double (x) (+ x x))
double
user(3): (compiled-function-p 'double)
nil
user(4): (compiled-function-p #'double)
nil
user(5): (compile 'double)
double
nil
nil
user(6): (compiled-function-p 'double)
nil
user(7): (compiled-function-p #'double)
t

(compiled-function-p #'double) should return t in both cases under Allegro
CL Lite for Windows.  let me know if this is not so.

#\Erik
-- 
404 You're better off without this URL.  Trust me.