aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/debug.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2005-02-10 14:54:45 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2005-02-10 14:54:45 +0100
commit5f57ad31792778dd585481c39f0deffef3aaa0a5 (patch)
tree260cb614852d6263229864541810297807d70342 /gcc/ada/debug.adb
parent16e845ef3dcb66829c8b5f086164cc7540093a73 (diff)
downloadgcc-5f57ad31792778dd585481c39f0deffef3aaa0a5.zip
gcc-5f57ad31792778dd585481c39f0deffef3aaa0a5.tar.gz
gcc-5f57ad31792778dd585481c39f0deffef3aaa0a5.tar.bz2
init.c (__gnat_initialize): Add a new parameter eh which contains the address of the exception registration.
* init.c (__gnat_initialize): Add a new parameter eh which contains the address of the exception registration. The Win32 version of this routine calls __gnat_install_SEH_handler() to initialize the SEH (Structured Exception Handling) handler. (__gnat_error_handler) [Win32]: Removed. Not needed as we use SEH (Structured Exception Handling) now. (__gnat_install_handler) [Win32]: Nothing to do now as we use SEH. (__gnat_initialize for ppc-vxworks): Adjust comments and the preprocessor condition protecting the call to the extra eh setup subprogram, which is only available for the ppc target. (__gnat_clear_exception_count): replaced reference to variable taskIdCurrent by call to taskIdSelf(), cleaner. * seh_init.c: New file. * Make-lang.in: (GNAT_ADA_OBJS): Add seh_init.o. (GNATBIND_OBJS): Idem. * misc.c (gnat_parse_file): Update call to __gnat_initialize. This routine takes a new parameter (a pointer to the exception registration for the SEH (Structured Exception Handling) support. * raise.h: (__gnat_install_SEH_handler): New prototype. Update copyright notice. * s-tassta.adb (Task_Wrapper): Declare the exception registration record and initialize it by calling __gnat_install_SEH_handler. From-SVN: r94816
Diffstat (limited to 'gcc/ada/debug.adb')
0 files changed, 0 insertions, 0 deletions