CATCH

[Charles Dolan <cpd@UCLA-LOCUS>]

I was wondering about the relative performance differences
for these two uses of CATCH.

	Non-local CATCH
        ---------------
	(lset *throw* nil)
	(define (func)
		(*throw* nil))

	(catch throw
		(bind ((*throw* throw))
			(func))
		OTHER CODE)

	Local CATCH
	-----------
	(catch throw
		(cond ((...) (throw nil)))
		OTHER CODE)

I am currently using the non-local catch to implement a PROLOG
cut (!) operation and I was wondering what it was costing me.

	-Charlie Dolan