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:
@@ -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 */
|
||||
|
||||
@@ -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 */
|
||||
|
||||
@@ -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
|
||||
|
||||
@@ -328,16 +328,6 @@ typedef signed char s_char;
|
||||
|
||||
|
||||
|
||||
/********************************************************/
|
||||
/* */
|
||||
/********************************************************/
|
||||
#ifdef APOLLO
|
||||
typedef signed char s_char;
|
||||
#endif /* APOLLO */
|
||||
|
||||
|
||||
|
||||
|
||||
/********************************************************/
|
||||
/* */
|
||||
/********************************************************/
|
||||
|
||||
Reference in New Issue
Block a user