Tweak the get*ent() OS/2 prototypes.
Jarkko Hietaniemi [Sun, 4 Mar 2001 17:20:45 +0000 (17:20 +0000)]
p4raw-id: //depot/perl@9013

os2/os2.c

index 7fe8113..50f0e1d 100644 (file)
--- a/os2/os2.c
+++ b/os2/os2.c
@@ -1162,12 +1162,10 @@ tcp1(char *name, int arg)
        ((void (*)(int)) fcn) (arg);
 }
 
-#ifndef HAS_GETHOSTENT         /* Older versions of EMX did not have it... */
-void * gethostent()    { return tcp0("GETHOSTENT");  }
-void * getnetent()     { return tcp0("GETNETENT");   }
-void * getprotoent()   { return tcp0("GETPROTOENT"); }
-void * getservent()    { return tcp0("GETSERVENT");  }
-#endif
+struct hostent *       gethostent()    { return tcp0("GETHOSTENT");  }
+struct netent *                getnetent()     { return tcp0("GETNETENT");   }
+struct protoent *      getprotoent()   { return tcp0("GETPROTOENT"); }
+struct servent *       getservent()    { return tcp0("GETSERVENT");  }
 
 void   sethostent(x)   { tcp1("SETHOSTENT",  x); }
 void   setnetent(x)    { tcp1("SETNETENT",   x); }