1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-27 04:12:51 +00:00

Remove platform support for Apollo/Domain. (#30)

This commit is contained in:
Bruce Mitchener
2020-12-13 09:07:08 +07:00
committed by GitHub
parent 69e66470a0
commit 292809694e
15 changed files with 5 additions and 137 deletions

View File

@@ -64,8 +64,8 @@ extern int Lin_term_count;
extern int Sign;
extern constraint_name *First_constraint_name;
/* I hate #ifdefs, but there seems to be no "standard" way to do this */
#if defined(__hpux) || defined(__apollo) || defined(_AIX)
/* for HP and Apollo (and possibly others) */
#if defined(__hpux) || defined(_AIX)
/* for HP, AIX, and possibly others */
extern unsigned char yytext[];
#else
/* For other computers */

View File

@@ -57,8 +57,8 @@ extern int Sign;
/* I hate #ifdefs, but there seems to be no "standard" way to do this */
#if defined(__hpux) || defined(__apollo)
/* for HP and Apollo (and possibly others) */
#if defined(__hpux)
/* for HP (and possibly others) */
extern unsigned char yytext[];
#else
/* For other computers */

View File

@@ -71,20 +71,6 @@ volatile extern int FP_error;
#define FPCLEAR
#define FPTEST(result) (isinf(result) || isnan(result))
#elif defined(APOLLO)
/**********************************************************/
/* Need values.h & nan.h, so we all parts of IsNANorINF */
/* are defined. IsNANorINF uses structure aliasing to */
/* get at pieces of the float to test it, so the item */
/* being tested can't be a register variable. Sigh. */
/**********************************************************/
#include </sys5/usr/include/values.h>
#include </sys5/usr/include/nan.h>
#define FPCLEAR
#define FPTEST(result) (IsNANorINF(result))
#undef REGISTER
#define REGISTER
#elif defined(OSF1)
#include <fp.h>
#define FPCLEAR

View File

@@ -328,16 +328,6 @@ typedef signed char s_char;
/********************************************************/
/* */
/********************************************************/
#ifdef APOLLO
typedef signed char s_char;
#endif /* APOLLO */
/********************************************************/
/* */
/********************************************************/