URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gcc.dg/] [cleanup-12.c] - Rev 298
Go to most recent revision | Compare with Previous | Blame | View Log
/* PR middle-end/32758 */ /* HP-UX libunwind.so doesn't provide _UA_END_OF_STACK */ /* { dg-do run } */ /* { dg-options "-O2 -fexceptions" } */ /* { dg-skip-if "" { "ia64-*-hpux11.*" } { "*" } { "" } } */ /* Verify unwind info in presence of alloca. */ #include <unwind.h> #include <stdlib.h> #include <string.h> static _Unwind_Reason_Code force_unwind_stop (int version, _Unwind_Action actions, _Unwind_Exception_Class exc_class, struct _Unwind_Exception *exc_obj, struct _Unwind_Context *context, void *stop_parameter) { if (actions & _UA_END_OF_STACK) abort (); return _URC_NO_REASON; } 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 (); } __attribute__((noinline)) void foo (void *x __attribute__((unused))) { force_unwind (); } __attribute__((noinline)) int bar (unsigned int x) { void *y = __builtin_alloca (x); foo (y); return 1; } static void handler (void *p __attribute__((unused))) { exit (0); } __attribute__((noinline)) static void doit () { char dummy __attribute__((cleanup (handler))); bar (1024); } int main () { doit (); abort (); }
Go to most recent revision | Compare with Previous | Blame | View Log