diff options
author | Thomas Quinot <quinot@adacore.com> | 2008-08-05 16:37:01 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-08-05 16:37:01 +0200 |
commit | c80645abe50e15e49353b9d1bce69ff46ed8d948 (patch) | |
tree | b2e200e02cc243fe04a3644e74e6c1787c48babb /gcc | |
parent | 1a6587c86fc4b571ea5d825400d48b6aa85230cb (diff) | |
download | gcc-c80645abe50e15e49353b9d1bce69ff46ed8d948.zip gcc-c80645abe50e15e49353b9d1bce69ff46ed8d948.tar.gz gcc-c80645abe50e15e49353b9d1bce69ff46ed8d948.tar.bz2 |
gsocket.h: Make this file includable in a Nucleus environment, which does not support sockets.
2008-08-05 Thomas Quinot <quinot@adacore.com>
* gsocket.h: Make this file includable in a Nucleus environment, which
does not support sockets.
* socket.c: Remove Nucleus-specific hack.
From-SVN: r138720
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/gsocket.h | 11 | ||||
-rw-r--r-- | gcc/ada/socket.c | 13 |
2 files changed, 19 insertions, 5 deletions
diff --git a/gcc/ada/gsocket.h b/gcc/ada/gsocket.h index 8b8c838..b98da05 100644 --- a/gcc/ada/gsocket.h +++ b/gcc/ada/gsocket.h @@ -30,6 +30,15 @@ * * ****************************************************************************/ +#if defined(__nucleus__) + +#warning Sockets not supported on this platform +#undef HAVE_SOCKETS + +#else + +#define HAVE_SOCKETS + #ifndef _XOPEN_SOURCE_EXTENDED #define _XOPEN_SOURCE_EXTENDED 1 /* For HP-UX */ @@ -190,3 +199,5 @@ #else # define Has_Sockaddr_Len 0 #endif + +#endif /* defined(__nucleus__) */ diff --git a/gcc/ada/socket.c b/gcc/ada/socket.c index bad0655..9653aae 100644 --- a/gcc/ada/socket.c +++ b/gcc/ada/socket.c @@ -31,11 +31,11 @@ ****************************************************************************/ /* This file provides a portable binding to the sockets API */ -#if defined (__nucleus__) -/* ??? Need proper implementation */ -#warning Sockets not yet supported on Nucleus -#else + #include "gsocket.h" + +#if defined(HAVE_SOCKETS) + /* Include all the necessary system-specific headers and define the * necessary macros (shared with gen-oscons). */ @@ -417,4 +417,7 @@ __gnat_get_h_errno (void) { return h_errno; #endif } -#endif /* __nucleus__ */ + +#else +#warning Sockets are not supported on this platform +#endif /* defined(HAVE_SOCKETS) */ |