github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-26 11:52:25 +00:00
Code Issues Projects Releases Wiki Activity

Remove HAS_GETHOSTID. (#218)

Browse Source 
This is only true on DOS now. It was previously true on older
unsupported platforms, but they are gone now.
This commit is contained in:
Bruce Mitchener
2021-01-13 11:10:21 +07:00
committed by GitHub
parent 7145f0d380
commit d3efbc3441
2 changed files with 3 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/initsout.c
View File

@@ -139,10 +139,10 @@ void init_ifpage(int sysout_size) {
*LASTVMEMFILEPAGE_word = InterfacePage->dllastvmempage;
#endif /* BIGVM */
/* unfortunately, Lisp only looks at a 16 bit serial number */
#ifdef HAS_GETHOSTID
/* unfortunately, Lisp only looks at a 16 bit serial number */
#ifndef DOS
InterfacePage->serialnumber = 0xffff & gethostid();
#endif /* HAS_GETHOSTID */
#endif /* DOS */
/* get user name and stuff into vmem; this is the VMEM buffer;
This is a BCPL string -- it starts with a length count. C strings