atexit function

atexit function

[Marco Maggi]

Is it possible to have an ATEXIT function? That is:
an interface to register thunks that are executed
when the script exits.

It would be useful for my test suite module, with
which test scripts are just top level invocation
to functions, without initialisation and finalisation.


--
Marco Maggi

"They say jump!, you say how high?"
Rage Against the Machine - "Bullet in the Head"



_______________________________________________
Guile-user mailing list
Guile-user@gnu.org
http://lists.gnu.org/mailman/listinfo/guile-user

Re: atexit function

[Kevin Ryde]

"Marco Maggi" <marco.maggi-ipsu@poste.it> 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)".


_______________________________________________
Guile-user mailing list
Guile-user@gnu.org
http://lists.gnu.org/mailman/listinfo/guile-user

Re: atexit function

[Jon Wilson]

Hi Marco,
I wonder if it is possible to use an async for this?  I've never used 
asyncs, so I'm not sure of their capabilities, but it seems like that would 
be the natural way to implement something like this.
Regards,
Jon

Marco Maggi wrote:
> Is it possible to have an ATEXIT function? That is:
> an interface to register thunks that are executed
> when the script exits.
> 
> It would be useful for my test suite module, with
> which test scripts are just top level invocation
> to functions, without initialisation and finalisation.
> 
> 


_______________________________________________
Guile-user mailing list
Guile-user@gnu.org
http://lists.gnu.org/mailman/listinfo/guile-user

Re: atexit function

[Marco Maggi]

No luck so far. The EXIT-HOOK is executed only if
RUN-HOOK is invoked and in my experiments this does
not happen with 'guile -s' or EXIT invocation.

I am thinking of patching guile for a special
EXIT signal, to make it work like the GNU Bash
fake EXIT signal.

--
Marco Maggi

"They say jump!, you say how high?"
Rage Against the Machine - "Bullet in the Head"



_______________________________________________
Guile-user mailing list
Guile-user@gnu.org
http://lists.gnu.org/mailman/listinfo/guile-user