/* $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); }