c   symbol definitions for Eunice TCP VMS hooks
c   3-oct-1984
        integer AF_INET
        parameter (AF_INET=2)
        integer SOCK_STREAM
        parameter (SOCK_STREAM=1)

        integer IO$_ACCESS
        parameter (IO$_ACCESS='32'x)
        integer IO$_READVBLK
        parameter (IO$_READVBLK='31'x)
        integer IO$_WRITEVBLK
        parameter (IO$_WRITEVBLK='30'x)

        integer IO$_SEND
        parameter (IO$_SEND=IO$_WRITEVBLK)
        integer IO$_RECEIVE
        parameter (IO$_RECEIVE=IO$_READVBLK)
        integer IO$_SOCKET
        parameter (IO$_SOCKET=IO$_ACCESS)
        integer IO$_BIND
        parameter (IO$_BIND=IO$_ACCESS+64)
        integer IO$_LISTEN
        parameter (IO$_LISTEN=IO$_ACCESS+128)
        integer IO$_ACCEPT
        parameter (IO$_ACCEPT=IO$_ACCESS+192)
        integer IO$_CONNECT
        parameter (IO$_CONNECT=IO$_ACCESS+256)
        integer IO$_ACCEPT_WAIT
        parameter (IO$_ACCEPT_WAIT=IO$_ACCESS+640)