]> git.ipfire.org Git - thirdparty/gcc.git/commit
init.c (__gnat_initialize): Add a new parameter eh which contains the address of...
authorArnaud Charlet <charlet@gcc.gnu.org>
Thu, 10 Feb 2005 13:54:45 +0000 (14:54 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Thu, 10 Feb 2005 13:54:45 +0000 (14:54 +0100)
commit5f57ad31792778dd585481c39f0deffef3aaa0a5
tree260cb614852d6263229864541810297807d70342
parent16e845ef3dcb66829c8b5f086164cc7540093a73
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
gcc/ada/Make-lang.in
gcc/ada/init.c
gcc/ada/misc.c
gcc/ada/raise.h
gcc/ada/s-tassta.adb
gcc/ada/seh_init.c [new file with mode: 0644]