*
*/
+/* Disabled catch handler --- this is the platform's job. dtrg */
+#undef CATCHHANDLER
+
mes 2,_EM_WSIZE,_EM_PSIZE
exa environ
loi _EM_PSIZE
lae environ
sti _EM_PSIZE
+#ifdef CATCHHANDLER
#if __unix && ! (__em22 || __em24 || __em44)
lpi $_ctch_
sig
asp _EM_PSIZE
+#endif
#endif
lal _EM_WSIZE+_EM_PSIZE
loi _EM_PSIZE
cal $exit
end
+#ifdef CATCHHANDLER
#if __unix && ! (__em22 || __em24 || __em44)
exp $_ctch_
pro $_ctch_,0
rtt
end 0
#endif
+#endif