github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-02-20 06:15:21 +00:00
Code Issues Projects Releases Wiki Activity

Remove SGI Irix platform support. (#33)

Browse Source 
This platform had no emulation-related changes.

Remove code for IRIX40, INDIGO definitions.

In disk code, simplify a chain of #ifdef's around fsync handling.
This commit is contained in:
Bruce Mitchener
2020-12-13 09:57:07 +07:00
committed by GitHub
parent 1c28005420
commit 750d84c78c
17 changed files with 10 additions and 298 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
src/unixfork.c
View File

@@ -31,22 +31,15 @@ static char *id = "$Id: unixfork.c,v 1.6 2001/12/26 22:17:05 sybalsky Exp $ Copy
#define FULLSLAVENAME
#endif
#ifdef INDIGO
#define USETERMIOS
#define TCSETS TCSETA
#define TCGETS TCGETA
#define FULLSLAVENAME
#endif
#include <sys/ioctl.h>
#ifndef USETERMIOS
#include <sys/ioctl.h>
#else
#if defined(INDIGO) || defined(MACOSX) || defined(FREEBSD)
#if defined(MACOSX) || defined(FREEBSD)
#include <termios.h>
#else
#include <sys/termios.h>
#endif /* INDIGO */
#endif /* MACOSX or FREEBSD */
#endif /* USETERMIOS */
#ifdef OSF1
@@ -83,11 +76,6 @@ typedef int clockid_t;
#include <sgtty.h>
#endif /* RISCOS */
#ifdef INDIGO
/* #include <sys/un.h> */
#include <sgtty.h>
#endif
#include "unixfork.h"
#ifdef DEBUG
@@ -199,11 +187,7 @@ int ForkUnixShell(int slot, char ltr, char numb, char *termtype, char *shellarg)
#else
ioctl(SlaveFD, TCGETS, (char *)&tio);
#endif
#ifdef INDIGO
tio.c_lflag |= ICANON | ECHO | ECHOE;
#else
tio.c_lflag |= ICANON | ECHO | ECHOE | ECHOCTL | ECHOKE;
#endif /* INDIGO */
#if defined(MACOSX) || defined(FREEBSD)
tcsetattr(SlaveFD, TCSANOW, &tio);
#else
@@ -405,7 +389,7 @@ int fork_Unix() {
if (SAFEREAD(LispPipeIn, (char *)&tmp, 2) < 0) perror("Slave reading slave pty len");
if (SAFEREAD(LispPipeIn, slavepty, tmp) < 0) perror("Slave reading slave pty id");
#endif /* INDIGO */
#endif /* FULLSLAVENAME */
if (IOBuf[0] == 'P') { /* The new style, which takes term type & command to csh */
if (SAFEREAD(LispPipeIn, (char *)&tmp, 2) < 0) perror("Slave reading cmd length");