diff options
| author | danglin <danglin@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-02-04 00:44:53 +0000 |
|---|---|---|
| committer | danglin <danglin@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-02-04 00:44:53 +0000 |
| commit | 974320de6eb9c6b10a92b6280a31090845b459c4 (patch) | |
| tree | 3da1d8792c133e6dc8356c5b0c6e85b93756432d /gcc/ada/initialize.c | |
| parent | 40eb63420d945f60bcae5255fdddfca2e2e1af00 (diff) | |
| download | gcc-974320de6eb9c6b10a92b6280a31090845b459c4.tar.gz | |
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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@110580 138bc75d-0d04-0410-961f-82ee72b054a4
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 9d00698b37f..58d8ca88af6 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 |