/* $Id: sys_socket_ph.c,v 1.1 1994/09/21 01:23:18 fielding Exp $ */
/* This simple program just prints out a sample sys/socket.ph file --  */
/* useful for those people having problems with perl sockets on SVR4   */

#include <stdio.h>
#include <sys/types.h>
#include <sys/socket.h>

int main() {

     printf("sub AF_INET { %d; }\n", AF_INET);
     printf("sub PF_INET { %d; }\n", PF_INET);
     printf("sub SOCK_DGRAM { %d; }\n", SOCK_DGRAM);
     printf("sub SOCK_STREAM { %d; }\n", SOCK_STREAM);
     printf("%d;\n", 1);
     exit(0);
}