From ... From: Erik Naggum Subject: Re: Is there an LISP interpreter for win 16/32 ? Date: 1997/08/27 Message-ID: <3081710924204472@naggum.no>#1/1 X-Deja-AN: 268688465 References: <34033259.369F@techie.com> <34033585.716B@techie.com> <3081615796586741@naggum.no> <340444AC.2DF5E75@nospan.netright.com> mail-copies-to: never Organization: Naggum Software; +47 8800 8879; http://www.naggum.no Newsgroups: comp.lang.lisp * 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.