1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-14 07:30:21 +00:00

Use the real gethostid on Solaris. (#121)

* Use the real gethostid on Solaris.

Solaris has this, so we might as well use it like we do on other
platforms. This value is used in response to queries from it from
Lisp.

* Improve undefining of HAS_GETHOSTID.

Enable it on Solaris in `inc/version.h`. This file already
disables it on DOS, so no need to do so again in `src/initsout.c`.
This commit is contained in:
Bruce Mitchener 2020-12-24 10:55:58 +07:00 committed by GitHub
parent e801373222
commit bf2855be58
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 1 additions and 8 deletions

View File

@ -231,7 +231,6 @@ typedef signed char s_char;
/********************************************************/
#ifdef OS5
/* Solaris, sort of SYSV-ish, but not really */
#undef HAS_GETHOSTID
#define SYSVSIGNALS 1
#define NOFORN
#define LOCK_X_UPDATES 1

View File

@ -24,9 +24,7 @@
#ifndef DOS
#include <pwd.h>
#else
#undef HAS_GETHOSTID
#endif /* DOS */
#endif
#include "hdw_conf.h"
#include "lispemul.h"

View File

@ -40,10 +40,6 @@
#include "osmsgdefs.h"
#include "uraiddefs.h"
#ifdef OS5
#define gethostid() 0
#endif /* OS5 */
/************************************************************************/
/* */
/* l i s p _ s t r i n g _ t o _ c _ s t r i n g */