Re: [PATCH][Ada] Updated GNAT Socket So *-rtems* Continues to Work

[Joel Sherrill <joel dot sherrill at oarcorp dot com>]

Thomas Quinot wrote:
> * Joel Sherrill, 2008-07-22 :
>
>   
> > From the current code for gsocket.h in SVN.  Apparently RTEMS,
> > VMS, and MINGW share this characteristic.
> >
> > #if !(defined (VMS) || defined (__MINGW32__) || \
> >      (defined(__rtems__) && defined(IN_RTS)))
> > #include <sys/socket.h>
> > #include <netinet/in.h>
> > #include <netinet/tcp.h>
> > #include <sys/ioctl.h>
> > #include <netdb.h>
> > #endif
> >     
>
> Well for VMS and Windows the header files have different names but we do
> include them in any case:
>
>   
I still think I was half right. :-D
> #ifdef __MINGW32__
> #include <winsock2.h>
> #include <ws2tcpip.h>
> [...]
>   
^^^^^^^^^ OK included
> #elif defined(VMS)
> #define FD_SETSIZE 4096
> #ifndef IN_RTS
>   

^^^^^^^^^ Checking IN_RTS means not included for
  VMS when building run-time. 
> /* These DEC C headers are not available when building with GCC */
> #include <in.h>
> #include <tcp.h>
> #include <ioctl.h>
> #include <netdb.h>
> #endif
>
> --
> Thomas Quinot, Ph.D. ** quinot@adacore.com ** Senior Software Engineer
>                AdaCore -- Paris, France -- New York, USA
>   


--
Joel Sherrill, Ph.D.             Director of Research & Development
joel.sherrill@OARcorp.com        On-Line Applications Research
Ask me about RTEMS: a free RTOS  Huntsville AL 35805
  Support Available             (256) 722-9985