diff options
| author | Arnaud Charlet <charlet@adacore.com> | 2019-07-18 16:37:40 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2019-07-18 18:37:40 +0200 |
| commit | a6fc663e311b2b862373e4a4f3ee7d6836acb1a2 (patch) | |
| tree | 6d0223791c112e5b47e7dd4a5dc668f65c71ca4f /gcc/ada/raise.c | |
| parent | b9a0100963b357e7e84084e45bbc51d6576410a4 (diff) | |
| download | gcc-a6fc663e311b2b862373e4a4f3ee7d6836acb1a2.zip gcc-a6fc663e311b2b862373e4a4f3ee7d6836acb1a2.tar.gz gcc-a6fc663e311b2b862373e4a4f3ee7d6836acb1a2.tar.bz2 | |
Makefile.rtl, [...]: Introduce a "STANDALONE" mode where C runtime files do not have any dependency...
* Makefile.rtl, expect.c, env.c, aux-io.c, mkdir.c, initialize.c,
cstreams.c, raise.c, tracebak.c, adadecode.c, init.c, raise-gcc.c,
argv.c, adaint.c, adaint.h, ctrl_c.c, sysdep.c, rtinit.c, cio.c,
seh_init.c, exit.c, targext.c: Introduce a "STANDALONE" mode where C
runtime files do not have any dependency on GCC include files.
Remove unnecessary includes.
Remove remaining references to VMS in runtime C file.
* runtime.h: new File.
From-SVN: r273576
Diffstat (limited to 'gcc/ada/raise.c')
| -rw-r--r-- | gcc/ada/raise.c | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/gcc/ada/raise.c b/gcc/ada/raise.c index 480a0ea..bf8a879 100644 --- a/gcc/ada/raise.c +++ b/gcc/ada/raise.c @@ -33,8 +33,7 @@ is shared between all exception handling mechanisms. */ #ifdef IN_RTS -#include "tconfig.h" -#include "tsystem.h" +#include "runtime.h" #else #include "config.h" #include "system.h" @@ -56,16 +55,6 @@ extern "C" { void __gnat_unhandled_terminate (void) { -#ifdef VMS - /* Special termination handling for VMS */ - long prvhnd; - - /* Remove the exception vector so it won't intercept any errors - in the call to exit, and go into and endless loop */ - - SYS$SETEXV (1, 0, 3, &prvhnd); -#endif - /* Default termination handling */ __gnat_os_exit (1); } |