mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-04-25 21:51:37 +08:00
gnatbl.c: [VMS] (_POSIX_EXIT): Define.
* gnatbl.c: [VMS] (_POSIX_EXIT): Define. [VMS] (#define exit hack): Remove. From-SVN: r94815
This commit is contained in:
parent
8aceda6473
commit
16e845ef3d
@ -6,7 +6,7 @@
|
||||
* *
|
||||
* C Implementation File *
|
||||
* *
|
||||
* Copyright (C) 1992-2003 Free Software Foundation, Inc. *
|
||||
* Copyright (C) 1992-2005 Free Software Foundation, Inc. *
|
||||
* *
|
||||
* GNAT is free software; you can redistribute it and/or modify it under *
|
||||
* terms of the GNU General Public License as published by the Free Soft- *
|
||||
@ -24,6 +24,10 @@
|
||||
* *
|
||||
****************************************************************************/
|
||||
|
||||
#ifdef VMS
|
||||
#define _POSIX_EXIT 1
|
||||
#endif
|
||||
|
||||
#include "config.h"
|
||||
#include "system.h"
|
||||
|
||||
@ -32,13 +36,6 @@
|
||||
#endif
|
||||
#include "adaint.h"
|
||||
|
||||
#ifdef VMS
|
||||
#ifdef exit
|
||||
#undef exit
|
||||
#endif
|
||||
#define exit __posix_exit
|
||||
#endif
|
||||
|
||||
/* These can be set by command line arguments */
|
||||
char *binder_path = 0;
|
||||
char *linker_path = 0;
|
||||
|
Loading…
x
Reference in New Issue
Block a user