1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
#define MP386
#include "att.h"
/* #include "386.h" */
/* #include "fcntl.h" */
#define DBEGIN _dbegin
#define DBEGIN_TY unsigned long
extern DBEGIN_TY _dbegin;
/* size to use for mallocs done */
/* #define BABY_MALLOC_SIZE 0x5000 */
#define RECREATE_HEAP recreate_heap1();
#ifdef IN_UNIXTIME
#undef ATT
#define BSD
#endif
#define IS_DIR_SEPARATOR(x) ((x=='/')||(x=='\\'))
#undef NEED_GETWD
#ifdef IN_UNIXFSYS
#undef ATT
#define BSD
#endif
/* on most machines this will test in one instruction
if the pointe/r is on the C stack or the 0 pointer
in winnt our heap starts at DBEGIN
*/
/* #define NULL_OR_ON_C_STACK(y)\ */
/* (((unsigned int)(y)) == 0 || \ */
/* (((unsigned int)(y)) < DBEGIN && ((unsigned int)(y)) &0xf000000)) */
/* #define NULL_OR_ON_C_STACK(y) (((void *)(y)) < ((void *)0x400000)) */
#define HAVE_SIGACTION
/* a noop */
#define brk(x) printf("not doing break\n");
#include <stdarg.h>
#include <stdio.h>
#define UNIXSAVE "unexnt.c"
#define MAXPATHLEN 260
#define SEPARATE_SFASL_FILE "sfaslcoff.c"
#define SPECIAL_RSYM "rsym_nt.c"
#define HAVE_AOUT "wincoff.h"
/* we dont need to worry about zeroing fp->_base , to prevent */
/* must use seek to go to beginning of string table */
/* #define MUST_SEEK_TO_STROFF */
/* #define N_STROFF(hdr) ((&hdr)->f_symptr+((&hdr)->f_nsyms)*SYMESZ) */
#define TO_NUMBER(ptr,type) (*((type *)(void *)(ptr)))
#define SEEK_TO_END_OFILE(fp) seek_to_end_ofile(fp)
#define RUN_PROCESS
#define IEEEFLOAT
#define I386
#define ADDITIONAL_FEATURES \
ADD_FEATURE("I386"); ADD_FEATURE("WINNT")
/* include some low level routines for maxima */
#define CMAC
#define RELOC_FILE "rel_coff.c"
#undef LISTEN_FOR_INPUT
#define LISTEN_FOR_INPUT(fp) do { \
int c = 0; \
if ((((FILE *)fp)->_r <= 0) && (ioctl(((FILE *)fp)->_file, FIONREAD, &c), c<=0)) \
return 0; \
} while (0)
/* adjust the start to the offset */
#define ADJUST_RELOC_START(j) \
the_start = memory->cfd.cfd_start + \
(j == DATA_NSCN ? textsize : 0);
#define IF_ALLOCATE_ERR \
if (core_end != sbrk(0))\
{char * e = sbrk(0); \
if (e - core_end < 0x10000 ) { \
int i; \
for (i=page(core_end); i < page(e); i++) { \
\
} \
core_end = e; \
} \
else \
error("Someone allocated my memory!");} \
if (core_end != (sbrk(PAGESIZE*(n - m))))
#include <limits.h>
#include <sys/stat.h>
#define GET_FULL_PATH_SELF(a_) do { \
static char q[PATH_MAX]; \
massert(which("/proc/self/exe",q) || which(argv[0],q)); \
(a_)=q; \
} while(0)
/* Begin for cmpinclude */
/* End for cmpinclude */
#define SF(a_) ((siginfo_t *)a_)
#define FPE_CODE(i_,v_) make_fixnum((long)fSfpe_code((long)FFN(fSfnstsw)(),(long)FFN(fSstmxcsr)()))
/* #define FPE_CODE(i_,v_) make_fixnum((fixnum)SF(i_)->si_code) */
#define FPE_ADDR(i_,v_) make_fixnum((fixnum)SF(i_)->si_addr)
#define FPE_CTXT(v_) Cnil
#define FPE_INIT Cnil
#undef HAVE_MPROTECT /*buggy on cygwin and unnecessary*/
|
