[Openmcl-devel] compiled closures for Qi?

Michael J. Ferrador n2kra at yahoo.com
Fri Jun 8 19:00:59 PDT 2007


I've been apropos-ing around CCL:

does anyone know what might be needed for OpenMCL here?

(DEFUN fix-closures ()
      #+CMU   (SETQ *closures* '(FUNCTION COMPILED-FUNCTION EVAL::INTERPRETED-FUNCTION))
      #+CLISP  (SETQ *closures* '(FUNCTION COMPILED-FUNCTION))
      #+ALLEGRO (SETQ *closures* '(EXCL::CLOSURE FUNCTION COMPILED-FUNCTION))
      #+SBCL   (SETQ *closures*
                   '(FUNCTION COMPILED-FUNCTION SB-EVAL:INTERPRETED-FUNCTION))
     #-(OR CLISP CMU SBCL ALLEGRO)
       (ERROR "Qi does not recognise this platform ~A" (LISP-IMPLEMENTATION-TYPE)))

I have the other blocks of save (core), & quit

just dabbling on the Prolog side with Qi from http://www.lambdassociates.org/





More information about the Openmcl-devel mailing list