diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-05 14:37:01 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-05 14:37:01 +0000 |
| commit | 2eac3695c42cfcd80fa4b1a236fcc2c88632755f (patch) | |
| tree | b2e200e02cc243fe04a3644e74e6c1787c48babb /gcc/ada/socket.c | |
| parent | 1895102775bb01802591b0eee8fde4dc257a6ad3 (diff) | |
| download | ppe42-gcc-2eac3695c42cfcd80fa4b1a236fcc2c88632755f.tar.gz ppe42-gcc-2eac3695c42cfcd80fa4b1a236fcc2c88632755f.zip | |
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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@138720 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/socket.c')
| -rw-r--r-- | gcc/ada/socket.c | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/gcc/ada/socket.c b/gcc/ada/socket.c index bad0655d051..9653aae1dfa 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) */ |
