From c80645abe50e15e49353b9d1bce69ff46ed8d948 Mon Sep 17 00:00:00 2001 From: Thomas Quinot Date: Tue, 5 Aug 2008 16:37:01 +0200 Subject: gsocket.h: Make this file includable in a Nucleus environment, which does not support sockets. 2008-08-05 Thomas Quinot * gsocket.h: Make this file includable in a Nucleus environment, which does not support sockets. * socket.c: Remove Nucleus-specific hack. From-SVN: r138720 --- gcc/ada/socket.c | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) (limited to 'gcc/ada/socket.c') 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) */ -- cgit v1.1