_Unwind_Reason_Code __gnat_Unwind_ForcedUnwind (_Unwind_Exception *e, void * handler, void * argument) { return _Unwind_SjLj_ForcedUnwind (e, handler, argument); }
static void force_unwind (void) { struct _Unwind_Exception *exc = malloc (sizeof (*exc)); memset (&exc->exception_class, 0, sizeof (exc->exception_class)); exc->exception_cleanup = 0; #ifndef __USING_SJLJ_EXCEPTIONS__ _Unwind_ForcedUnwind (exc, force_unwind_stop, 0); #else _Unwind_SjLj_ForcedUnwind (exc, force_unwind_stop, 0); #endif abort (); }
force_unwind () { _Unwind_Exception *exc = new _Unwind_Exception; // exception_class might not be a scalar. memset (&exc->exception_class, 0, sizeof (exc->exception_class)); exc->exception_cleanup = 0; #ifndef __USING_SJLJ_EXCEPTIONS__ _Unwind_ForcedUnwind (exc, force_unwind_stop, 0); #else _Unwind_SjLj_ForcedUnwind (exc, force_unwind_stop, 0); #endif abort (); }
static void force_unwind () { _Unwind_Exception *exc = new _Unwind_Exception; exc->exception_class = 0; exc->exception_cleanup = force_unwind_cleanup; #ifndef __USING_SJLJ_EXCEPTIONS__ _Unwind_ForcedUnwind (exc, force_unwind_stop, 0); #else _Unwind_SjLj_ForcedUnwind (exc, force_unwind_stop, 0); #endif abort (); }