GNAT sockets

GNAT sockets

[Daniel Fanjul]

Hello,

I wrote this code to be compiled with GNAT (for Windows 95):

    #include "windows.h"
    #include "windows32\sockets.h"

    int main () {
        SOCKET s;

        s = socket (AF_INET, SOCK_STREAM, 0);
        printf ("%d", s);
        return 0;
    }

The output was -1.

Can anybody help me?

Thanks.

    Daniel.

Re: GNAT sockets

[David Botton]

Take a look at

http://www.botton.com/ada/os

There are some Ada 95 examples of sockets and links to thick bindings
for Win32 and Unix.

David Botton
The Ada Source Code Treasury
http://www.botton.com/ada

Daniel Fanjul wrote:

> Hello,
>
> I wrote this code to be compiled with GNAT (for Windows 95):
>
>     #include "windows.h"
>     #include "windows32\sockets.h"
>
>     int main () {
>         SOCKET s;
>
>         s = socket (AF_INET, SOCK_STREAM, 0);
>         printf ("%d", s);
>         return 0;
>     }
>
> The output was -1.
>
> Can anybody help me?
>
> Thanks.
>
>     Daniel.

Re: GNAT sockets

[dennison]

In article <368a76d8.0@dial-in.encomix.es>,
  "Daniel Fanjul" <ib313541@public.ibercaja.es> wrote:
> Hello,
>
> I wrote this code to be compiled with GNAT (for Windows 95):
>
>     #include "windows.h"
>     #include "windows32\sockets.h"
>
>     int main () {
>         SOCKET s;
>
>         s = socket (AF_INET, SOCK_STREAM, 0);
>         printf ("%d", s);
>         return 0;
>     }
>
> The output was -1.
>
> Can anybody help me?

Oddly enough, -1 means you got an error. There should be a code in errno
specifing exactly what error you got. The information I just gave you, along
with the information you will need to decipher the errno value should be in
your win32 documentation, or a good book on sockets.

As an aside, there's a little-known feature of Gnat that allows you to compile
Ada code with it. You really ought to try it out. ;-)

--
T.E.D.

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own    

Re: GNAT sockets

[Steve Doiel]

Daniel Fanjul wrote in message <368a76d8.0@dial-in.encomix.es>...
>Hello,
>
>I wrote this code to be compiled with GNAT (for Windows 95):
>
>    #include "windows.h"
>    #include "windows32\sockets.h"
>
>    int main () {
>        SOCKET s;
>
>        s = socket (AF_INET, SOCK_STREAM, 0);
>        printf ("%d", s);
>        return 0;
>    }
>
>The output was -1.
>
>Can anybody help me?
>
Yes.

You need to call WSAStartup before any of the Win32 socket stuff will work
at all.
You'll have to find this in the Win32 documentation since it is Win32
specific (no such call is required under UNIX).

SteveD

Re: GNAT sockets

[robert_dewar]

In article <368a76d8.0@dial-in.encomix.es>,
  "Daniel Fanjul" <ib313541@public.ibercaja.es> wrote:
> Hello,
>
> I wrote this code to be compiled with GNAT (for Windows
95):
>
>     #include "windows.h"
>     #include "windows32\sockets.h"
>
>     int main () {
>         SOCKET s;
>
>         s = socket (AF_INET, SOCK_STREAM, 0);
>         printf ("%d", s);
>         return 0;
>     }
>
> The output was -1.


The above program was a C program! Not an Ada 95 program.
GNAT is an Ada 95 compiler, so most certainly you did NOT
compile this using GNAT. The GNAT distribution includes the
GNU C front end for gcc, which provides a standard C
environment, but it has nothing to do with Ada, so your
question is better addressed to a different news group.

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own    

Re: GNAT sockets

[Jerry van Dijk]

: The output was -1.

You might take a look at my sockets package for Win32 on my
homepage.

regards,
Jerry.
-- 
-- Jerry van Dijk  | email: jdijk@acm.org
-- Leiden, Holland | member Team-Ada
-- Ada & Win32: http://stad.dsl.nl/~jvandyk