1 /* { dg-do run { target hppa*-*-hpux* *-*-linux* *-*-gnu* powerpc*-*-darwin* *-*-darwin[912]* } } */
2 /* { dg-options "-fexceptions -fnon-call-exceptions -O2" } */
3 /* Verify that cleanups work with exception handling through realtime
11 static _Unwind_Reason_Code
12 force_unwind_stop (int version, _Unwind_Action actions,
13 _Unwind_Exception_Class exc_class,
14 struct _Unwind_Exception *exc_obj,
15 struct _Unwind_Context *context,
18 if (actions & _UA_END_OF_STACK)
20 return _URC_NO_REASON;
23 static void force_unwind ()
25 struct _Unwind_Exception *exc
26 = (struct _Unwind_Exception *) malloc (sizeof (*exc));
27 memset (&exc->exception_class, 0, sizeof (exc->exception_class));
28 exc->exception_cleanup = 0;
30 #ifndef __USING_SJLJ_EXCEPTIONS__
31 _Unwind_ForcedUnwind (exc, force_unwind_stop, 0);
33 _Unwind_SjLj_ForcedUnwind (exc, force_unwind_stop, 0);
42 static void counter (void *p __attribute__((unused)))
47 static void handler (void *p __attribute__((unused)))
54 static int __attribute__((noinline)) fn5 ()
56 char dummy __attribute__((cleanup (counter)));
61 static void fn4 (int sig, siginfo_t *info, void *ctx)
63 char dummy __attribute__((cleanup (counter)));
73 static int __attribute__((noinline)) fn2 ()
80 static int __attribute__((noinline)) fn1 ()
83 sigemptyset (&s.sa_mask);
85 s.sa_flags = SA_RESETHAND | SA_SIGINFO;
86 sigaction (SIGSEGV, &s, NULL);
87 sigaction (SIGBUS, &s, NULL);
92 static int __attribute__((noinline)) fn0 ()
94 char dummy __attribute__((cleanup (handler)));