Re: atexit function

[Kevin Ryde]

"Marco Maggi" <address@hidden> writes:
>
> Is it possible to have an ATEXIT function? That is:
> an interface to register thunks that are executed
> when the script exits.

I've been using this:

        (define-public (c-atexit proc)
          (let ((old-exit exit))
            (set! exit (lambda args
                         (proc)
                         (apply old-exit args)))))

to hang code on the exit func.  Unfortunately the normal "guile -s" to
run a script doesn't go via that function, so it only works if you
explicitly "(exit 0)".