(FLUID (QUOTE (THROWSIGNAL!* THROWTAG!*)))
(GLOBAL (QUOTE (EMSG!*)))
(PUT (QUOTE CATCH!-ALL) (QUOTE TYPE) (QUOTE MACRO))
(PUT (QUOTE UNWIND!-ALL) (QUOTE TYPE) (QUOTE MACRO))
(PUT (QUOTE UNWIND!-PROTECT) (QUOTE TYPE) (QUOTE MACRO))
(PUT (QUOTE CATCH) (QUOTE TYPE) (QUOTE FEXPR))
(PUT (QUOTE !*CATCH) (QUOTE TYPE) (QUOTE MACRO))
(FLUID (QUOTE (PROGJUMPTABLE!* PROGBODY!*)))
(PUT (QUOTE PROG) (QUOTE TYPE) (QUOTE FEXPR))
(PUT (QUOTE GO) (QUOTE TYPE) (QUOTE FEXPR))
