[Openmcl-devel] Trouble with save-application

[Jared C. Davis]

Hi,

I am trying to create a lisp image which runs a "main" function at
startup.  Here is how I created the image:

    (defun main ()
      (format t "Hello, world!")
      (CCL::quit))

    (CCL::save-application "hello-world.image" :toplevel-function #'main)

This successfuly creates the hello-world.image file, but when I try to
use the image I get this error:

    [jared at lhug-1 OpenMCL]$ openmcl -I hello-world.image
    Error during early application initialization:

    value #<A Dead Mac Pointer> is not of the expected type MACPTR.
    ? for help
    [26302] OpenMCL kernel debugger:

I am using 1.1-pre-070512 (LinuxX8664).  I'm not sure if I've done
something wrong or if this is a bug, so in case it's a bug here is the
backtrace.

current thread: tcr = 0x2b2baac46de0, native thread ID = 0x66be,
interrupts enabled

(#x00002B2BAAE58CF8) #x000030004055281C : #<Anonymous Function
#x000030004055192F> + 3821
(#x00002B2BAAE58D58) #x00003000404B2C3C : #<Function
FUNCALL-WITH-ERROR-REENTRY-DETECTION #x00003000404B2B6F> + 205
(#x00002B2BAAE58D98) #x0000300040552D54 : #<Function %XERR-DISP
#x0000300040552B7F> + 469
(#x00002B2BAAE58DD0) #x0000300040126754 : #<Function
%PASCAL-FUNCTIONS% #x00003000401265BF> + 405
Bogus  frame 2b2baae58e28
[26302] OpenMCL kernel debugger:

I can work around this by taking out the :toplevel-function parameter
and adding the -e option to the command line, i.e.,
   openmcl -I hello-world.image -e "(main)"

But I'd ideally like to get the main function built right into the image.

Thanks!
    Jared

-- 
Jared C. Davis <jared at cs.utexas.edu>
3600 Greystone Drive #604
Austin, TX 78731
http://www.cs.utexas.edu/users/jared/