diff options
| -rw-r--r-- | lisp/internal.h | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lisp/internal.h b/lisp/internal.h index a0c6f10..855bb42 100644 --- a/lisp/internal.h +++ b/lisp/internal.h @@ -549,6 +549,13 @@ typedef struct { LispObj *errorp; /* ALWAYS (ONLY) READABLE: stderr of program */ } LispPipe; +/* silly IBM compiler */ +#ifdef AIXV5 /* probably want !gcc too */ +#define LispType int +#define LispFunType int +#define LispStreamType int +#endif + struct _LispObj { LispType type : 6; unsigned int mark : 1; /* gc protected */ @@ -641,6 +648,11 @@ struct _LispObj { } hash; } data; }; +#ifdef AIXV5 +#undef LispType +#undef LispFunType +#undef LispStreamType +#endif typedef LispObj *(*LispFunPtr)(LispBuiltin*); typedef void (*LispComPtr)(LispCom*, LispBuiltin*); |