diff options
Diffstat (limited to 'otherlibs/unix/gethostname.c')
-rw-r--r-- | otherlibs/unix/gethostname.c | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/otherlibs/unix/gethostname.c b/otherlibs/unix/gethostname.c deleted file mode 100644 index 4c11c6b2a9..0000000000 --- a/otherlibs/unix/gethostname.c +++ /dev/null @@ -1,37 +0,0 @@ -#include <mlvalues.h> -#include <alloc.h> -#include <sys/param.h> -#include "unix.h" - -#ifdef HAS_GETHOSTNAME - -#ifndef MAXHOSTNAMELEN -#define MAXHOSTNAMELEN 256 -#endif - -value unix_gethostname() /* ML */ -{ - char name[MAXHOSTNAMELEN]; - gethostname(name, MAXHOSTNAMELEN); - name[MAXHOSTNAMELEN-1] = 0; - return copy_string(name); -} - -#else -#ifdef HAS_UNAME - -#include <sys/utsname.h> - -value unix_gethostname() -{ - struct utsname un; - uname(&un); - return copy_string(un.nodename); -} - -#else - -value unix_gethostname() { invalid_argument("gethostname not implemented"); } - -#endif -#endif |