diff options
| author | John David Anglin <dave.anglin@nrc-cnrc.gc.ca> | 2006-02-04 00:44:53 +0000 |
|---|---|---|
| committer | John David Anglin <danglin@gcc.gnu.org> | 2006-02-04 00:44:53 +0000 |
| commit | 3df6582b4758a45cec6fbf55917e63030a2c598f (patch) | |
| tree | 3da1d8792c133e6dc8356c5b0c6e85b93756432d /gcc/ada/initialize.c | |
| parent | 74a88f62d13fd952202dec580cfa243b4a419798 (diff) | |
| download | gcc-3df6582b4758a45cec6fbf55917e63030a2c598f.zip gcc-3df6582b4758a45cec6fbf55917e63030a2c598f.tar.gz gcc-3df6582b4758a45cec6fbf55917e63030a2c598f.tar.bz2 | |
re PR target/25926 (A87B59A SIGABRT)
PR target/25926
* ada/initialize.c (__gnat_initialize): Provide HP-UX 10 host and target
implementation that calls __main.
* pa/x-ada (X_ADA_CFLAGS): Define _X_HPUX10 on HP-UX 10.
* pa/t-pa (TARGET_LIBGCC2_CFLAGS): Define _T_HPUX10 on HP-UX 10.
From-SVN: r110580
Diffstat (limited to 'gcc/ada/initialize.c')
| -rw-r--r-- | gcc/ada/initialize.c | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/gcc/ada/initialize.c b/gcc/ada/initialize.c index 9d00698..58d8ca8 100644 --- a/gcc/ada/initialize.c +++ b/gcc/ada/initialize.c @@ -170,6 +170,20 @@ __gnat_initialize (void *eh) #endif } +#elif defined(_T_HPUX10) || (!defined(IN_RTS) && defined(_X_HPUX10)) + +/************************************************/ +/* __gnat_initialize (PA-RISC HP-UX 10 Version) */ +/************************************************/ + +extern void __main (void); + +void +__gnat_initialize (void *eh ATTRIBUTE_UNUSED) +{ + __main (); +} + #else /* For all other versions of GNAT, the initialize routine and handler |