diff options
Diffstat (limited to 'gcc/ada/adaint.c')
| -rw-r--r-- | gcc/ada/adaint.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index 52e0096..5f4b95d5 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -2465,13 +2465,15 @@ __gnat_copy_attribs (char *from, char *to, int mode) extern void __gnat_install_locks (void (*) (void), void (*) (void)); /* This function offers a hook for libgnarl to set the - locking subprograms for libgcc_eh. */ + locking subprograms for libgcc_eh. + This is only needed on OpenVMS, since other platforms use standard + --enable-threads=posix option, or similar. */ void __gnatlib_install_locks (void (*lock) (void) ATTRIBUTE_UNUSED, void (*unlock) (void) ATTRIBUTE_UNUSED) { -#ifdef IN_RTS +#if defined (IN_RTS) && defined (VMS) __gnat_install_locks (lock, unlock); /* There is a bootstrap path issue if adaint is build with this symbol unresolved for the stage1 compiler. Since the compiler |