[plt-scheme] Catch all exceptions

Hi,

I was wondering, is there a catch-all type mechanism in mzscheme to
catch all exceptions?

I want something like
	(with-handlers ([any-exn? (lambda (exn)  (write "foo"))])
		(my-proc))

Is something like tha doable?

Thanks.

--Dima

Dmitriy Zavin
Infineon Technologies North America