Re: [Maxima-discuss] Calling user-defined function from lisp

[Thomas B. <bar...@gm...>]

On Thu, 8 Sep 2022, Leo Butler wrote:
> You need to declare a toplevel. This works:
>
> $ sbcl --core ./maxima.core
>
> * (sb-ext:save-lisp-and-die "maxima.core" :executable t :toplevel #'maxima::$to_lisp)
>
> [undoing binding stack and other enclosing state... done]
> [performing final GC... done]
> [defragmenting immobile space... (fin,inst,fdefn,code,sym)=594+760+24676+26625+27150... done]
> [saving current Lisp image into maxima.core:
> writing 0 bytes from the read-only space at 0x50000000
> writing 736 bytes from the static space at 0x50100000
> writing 38797312 bytes from the dynamic space at 0x1000000000
> writing 2236416 bytes from the immobile space at 0x50200000
> writing 22208512 bytes from the immobile space at 0x52a00000
> done]
>
> $ ./maxima.core
>
> Type (to-maxima) to restart, ($quit) to quit Maxima.
> ^^^^^^^^^^Message emitted by to_lisp^^^^^^^^^^^^^^^^
>
> COMMON-LISP-USER> (in-package :maxima)
>
> #<PACKAGE "MAXIMA">
> MAXIMA> (mfuncall '$factor 35)

Thank you, this is very nice!

Regards,

--
Thomas Baruchel