OSDN Git Service

25fff6e7e6aa5326c51a73320dd53053dfc8a7e6
[pf3gnuchains/gcc-fork.git] / boehm-gc / include / private / gcconfig.h
1 /* 
2  * Copyright 1988, 1989 Hans-J. Boehm, Alan J. Demers
3  * Copyright (c) 1991-1994 by Xerox Corporation.  All rights reserved.
4  * Copyright (c) 1996 by Silicon Graphics.  All rights reserved.
5  * Copyright (c) 2000-2004 Hewlett-Packard Development Company, L.P.
6  *
7  * THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED
8  * OR IMPLIED.  ANY USE IS AT YOUR OWN RISK.
9  *
10  * Permission is hereby granted to use or copy this program
11  * for any purpose,  provided the above notices are retained on all copies.
12  * Permission to modify the code and to distribute modified code is granted,
13  * provided the above notices are retained, and a notice that the code was
14  * modified is included with the above copyright notice.
15  */
16
17 /*
18  * This header is private to the gc.  It is almost always included from
19  * gc_priv.h.  However it is possible to include it by itself if just the
20  * configuration macros are needed.  In that
21  * case, a few declarations relying on types declared in gc_priv.h will be
22  * omitted.
23  */
24  
25 #ifndef GCCONFIG_H
26
27 # define GCCONFIG_H
28
29 # ifndef GC_PRIVATE_H
30     /* Fake ptr_t declaration, just to avoid compilation errors.        */
31     /* This avoids many instances if "ifndef GC_PRIVATE_H" below.       */
32     typedef struct GC_undefined_struct * ptr_t;
33 # endif
34
35 /* Machine dependent parameters.  Some tuning parameters can be found   */
36 /* near the top of gc_private.h.                                        */
37
38 /* Machine specific parts contributed by various people.  See README file. */
39
40 /* First a unified test for Linux: */
41 # if defined(linux) || defined(__linux__)
42 #  ifndef LINUX
43 #    define LINUX
44 #  endif
45 # endif
46
47 /* And one for NetBSD: */
48 # if defined(__NetBSD__)
49 #    define NETBSD
50 # endif
51
52 /* And one for OpenBSD: */
53 # if defined(__OpenBSD__)
54 #    define OPENBSD
55 # endif
56
57 /* And one for FreeBSD: */
58 # if ( defined(__FreeBSD__) || defined(__FreeBSD_kernel__) ) && !defined(FREEBSD)
59 #    define FREEBSD
60 # endif
61
62 /* Determine the machine type: */
63 # if defined(__arm__) || defined(__thumb__)
64 #    define ARM32
65 #    if !defined(LINUX) && !defined(NETBSD)
66 #      define NOSYS
67 #      define mach_type_known
68 #    endif
69 # endif
70 # if defined(sun) && defined(mc68000)
71 #    define M68K
72 #    define SUNOS4
73 #    define mach_type_known
74 # endif
75 # if defined(hp9000s300)
76 #    define M68K
77 #    define HP
78 #    define mach_type_known
79 # endif
80 # if defined(OPENBSD) && defined(m68k)
81 #    define M68K
82 #    define mach_type_known
83 # endif
84 # if defined(OPENBSD) && defined(__sparc__)
85 #    define SPARC
86 #    define mach_type_known
87 # endif
88 # if defined(NETBSD) && (defined(m68k) || defined(__m68k__))
89 #    define M68K
90 #    define mach_type_known
91 # endif
92 # if defined(NETBSD) && defined(__powerpc__)
93 #    define POWERPC
94 #    define mach_type_known
95 # endif
96 # if defined(NETBSD) && (defined(__arm32__) || defined(__arm__))
97 #    define ARM32
98 #    define mach_type_known
99 # endif
100 # if defined(NETBSD) && defined(__sh__)
101 #    define SH
102 #    define mach_type_known
103 # endif
104 # if defined(vax)
105 #    define VAX
106 #    ifdef ultrix
107 #       define ULTRIX
108 #    else
109 #       define BSD
110 #    endif
111 #    define mach_type_known
112 # endif
113 # if defined(__NetBSD__) && defined(__vax__)
114 #    define VAX
115 #    define mach_type_known
116 # endif
117 # if defined(mips) || defined(__mips) || defined(_mips)
118 #    define MIPS
119 #    if defined(nec_ews) || defined(_nec_ews)
120 #      define EWS4800
121 #    endif
122 #    if !defined(LINUX) && !defined(EWS4800) && !defined(NETBSD)
123 #      if defined(ultrix) || defined(__ultrix)
124 #        define ULTRIX
125 #      else
126 #        if defined(_SYSTYPE_SVR4) || defined(SYSTYPE_SVR4) \
127             || defined(__SYSTYPE_SVR4__)
128 #          define IRIX5   /* or IRIX 6.X */
129 #        else
130 #          define RISCOS  /* or IRIX 4.X */
131 #        endif
132 #      endif
133 #    endif /* !LINUX */
134 #    if defined(__NetBSD__) && defined(__MIPSEL__)
135 #      undef ULTRIX
136 #    endif
137 #    define mach_type_known
138 # endif
139 # if defined(DGUX) && (defined(i386) || defined(__i386__))
140 #    define I386
141 #    ifndef _USING_DGUX
142 #    define _USING_DGUX
143 #    endif
144 #    define mach_type_known
145 # endif
146 # if defined(sequent) && (defined(i386) || defined(__i386__))
147 #    define I386
148 #    define SEQUENT
149 #    define mach_type_known
150 # endif
151 # if defined(sun) && (defined(i386) || defined(__i386__))
152 #    define I386
153 #    define SUNOS5
154 #    define mach_type_known
155 # endif
156 # if defined(sun) && defined(__amd64)
157 #    define X86_64
158 #    define SUNOS5
159 #    define mach_type_known
160 # endif
161 # if (defined(__OS2__) || defined(__EMX__)) && defined(__32BIT__)
162 #    define I386
163 #    define OS2
164 #    define mach_type_known
165 # endif
166 # if defined(ibm032)
167 #   define RT
168 #   define mach_type_known
169 # endif
170 # if defined(sun) && (defined(sparc) || defined(__sparc))
171 #   define SPARC
172     /* Test for SunOS 5.x */
173 #     include <errno.h>
174 #     ifdef ECHRNG
175 #       define SUNOS5
176 #     else
177 #       define SUNOS4
178 #     endif
179 #   define mach_type_known
180 # endif
181 # if defined(sparc) && defined(unix) && !defined(sun) && !defined(linux) \
182      && !defined(__OpenBSD__) && !defined(__NetBSD__) && !defined(__FreeBSD__)
183 #   define SPARC
184 #   define DRSNX
185 #   define mach_type_known
186 # endif
187 # if defined(_IBMR2)
188 #   define RS6000
189 #   define mach_type_known
190 # endif
191 # if defined(__NetBSD__) && defined(__sparc__)
192 #   define SPARC
193 #   define mach_type_known
194 # endif
195 # if defined(_M_XENIX) && defined(_M_SYSV) && defined(_M_I386)
196         /* The above test may need refinement   */
197 #   define I386
198 #   if defined(_SCO_ELF)
199 #     define SCO_ELF
200 #   else
201 #     define SCO
202 #   endif
203 #   define mach_type_known
204 # endif
205 # if defined(_AUX_SOURCE)
206 #   define M68K
207 #   define SYSV
208 #   define mach_type_known
209 # endif
210 # if defined(_PA_RISC1_0) || defined(_PA_RISC1_1) || defined(_PA_RISC2_0) \
211      || defined(hppa) || defined(__hppa__)
212 #   define HP_PA
213 #   if !defined(LINUX) && !defined(HPUX)
214 #     define HPUX
215 #   endif
216 #   define mach_type_known
217 # endif
218 # if defined(__ia64) && defined(_HPUX_SOURCE)
219 #   define IA64
220 #   ifndef HPUX
221 #     define HPUX
222 #   endif
223 #   define mach_type_known
224 # endif
225 # if defined(__BEOS__) && defined(_X86_)
226 #    define I386
227 #    define BEOS
228 #    define mach_type_known
229 # endif
230 # if defined(LINUX) && (defined(i386) || defined(__i386__))
231 #    define I386
232 #    define mach_type_known
233 # endif
234 # if defined(LINUX) && defined(__x86_64__)
235 #    define X86_64
236 #    define mach_type_known
237 # endif
238 # if defined(LINUX) && (defined(__ia64__) || defined(__ia64))
239 #    define IA64
240 #    define mach_type_known
241 # endif
242 # if defined(LINUX) && defined(__arm__)
243 #    define ARM32
244 #    define mach_type_known
245 # endif
246 # if defined(LINUX) && defined(__cris__)
247 #    ifndef CRIS
248 #       define CRIS
249 #    endif
250 #    define mach_type_known
251 # endif
252 # if defined(LINUX) && (defined(powerpc) || defined(__powerpc__) || \
253                         defined(powerpc64) || defined(__powerpc64__))
254 #    define POWERPC
255 #    define mach_type_known
256 # endif
257 # if defined(FREEBSD) && (defined(powerpc) || defined(__powerpc__))
258 #    define POWERPC
259 #    define mach_type_known
260 # endif
261 # if defined(LINUX) && defined(__mc68000__)
262 #    define M68K
263 #    define mach_type_known
264 # endif
265 # if defined(LINUX) && (defined(sparc) || defined(__sparc__))
266 #    define SPARC
267 #    define mach_type_known
268 # endif
269 # if defined(LINUX) && defined(__arm__)
270 #    define ARM32
271 #    define mach_type_known
272 # endif
273 # if defined(LINUX) && defined(__sh__)
274 #    define SH
275 #    define mach_type_known
276 # endif
277 # if defined(LINUX) && defined(__m32r__)
278 #    define M32R
279 #    define mach_type_known
280 # endif
281 # if defined(__alpha) || defined(__alpha__)
282 #   define ALPHA
283 #   if !defined(LINUX) && !defined(NETBSD) && !defined(OPENBSD) && !defined(FREEBSD)
284 #     define OSF1       /* a.k.a Digital Unix */
285 #   endif
286 #   define mach_type_known
287 # endif
288 # if defined(_AMIGA) && !defined(AMIGA)
289 #   define AMIGA
290 # endif
291 # ifdef AMIGA 
292 #   define M68K
293 #   define mach_type_known
294 # endif
295 # if defined(THINK_C) || defined(__MWERKS__) && !defined(__powerc)
296 #   define M68K
297 #   define MACOS
298 #   define mach_type_known
299 # endif
300 # if defined(__MWERKS__) && defined(__powerc) && !defined(__MACH__)
301 #   define POWERPC
302 #   define MACOS
303 #   define mach_type_known
304 # endif
305 # if defined(macosx) || (defined(__APPLE__) && defined(__MACH__))
306 #   define DARWIN
307 #   if defined(__ppc__)  || defined(__ppc64__)
308 #    define POWERPC
309 #    define mach_type_known
310 #   elif defined(__x86_64__)
311 #    define X86_64
312 #    define mach_type_known
313 #   elif defined(__i386__)
314 #    define I386
315 #    define mach_type_known
316 #   endif
317 # endif
318 # if defined(NeXT) && defined(mc68000)
319 #   define M68K
320 #   define NEXT
321 #   define mach_type_known
322 # endif
323 # if defined(NeXT) && (defined(i386) || defined(__i386__))
324 #   define I386
325 #   define NEXT
326 #   define mach_type_known
327 # endif
328 # if defined(__OpenBSD__) && (defined(i386) || defined(__i386__))
329 #   define I386
330 #   define OPENBSD
331 #   define mach_type_known
332 # endif
333 # if defined(FREEBSD) && (defined(i386) || defined(__i386__))
334 #   define I386
335 #   define mach_type_known
336 # endif
337 # if defined(FREEBSD) && defined(__x86_64__)
338 #   define X86_64
339 #   define mach_type_known
340 # endif
341 # if defined(__NetBSD__) && (defined(i386) || defined(__i386__))
342 #   define I386
343 #   define mach_type_known
344 # endif
345 # if defined(__NetBSD__) && defined(__x86_64__)
346 #    define X86_64
347 #    define mach_type_known
348 # endif
349 # if defined(FREEBSD) && defined(__sparc__)
350 #    define SPARC
351 #    define mach_type_known
352 #endif
353 # if defined(bsdi) && (defined(i386) || defined(__i386__))
354 #    define I386
355 #    define BSDI
356 #    define mach_type_known
357 # endif
358 # if !defined(mach_type_known) && defined(__386BSD__)
359 #   define I386
360 #   define THREE86BSD
361 #   define mach_type_known
362 # endif
363 # if defined(_CX_UX) && defined(_M88K)
364 #   define M88K
365 #   define CX_UX
366 #   define mach_type_known
367 # endif
368 # if defined(DGUX) && defined(m88k)
369 #   define M88K
370     /* DGUX defined */
371 #   define mach_type_known
372 # endif
373 # if defined(_WIN32_WCE)
374     /* SH3, SH4, MIPS already defined for corresponding architectures */
375 #   if defined(SH3) || defined(SH4)
376 #     define SH
377 #   endif
378 #   if defined(x86)
379 #     define I386
380 #   endif
381 #   if defined(ARM)
382 #     define ARM32
383 #   endif
384 #   define MSWINCE
385 #   define mach_type_known
386 # else
387 #   if (defined(_MSDOS) || defined(_MSC_VER)) && (_M_IX86 >= 300) \
388         || defined(_WIN32) && !defined(__CYGWIN32__) && !defined(__CYGWIN__)
389 #     define I386
390 #     define MSWIN32    /* or Win32s */
391 #     define mach_type_known
392 #   endif
393 #   if defined(_MSC_VER) && defined(_M_IA64)
394 #     define IA64
395 #     define MSWIN32    /* Really win64, but we don't treat 64-bit      */
396                         /* variants as a differnt platform.             */
397 #   endif
398 # endif
399 # if defined(__DJGPP__)
400 #   define I386
401 #   ifndef DJGPP
402 #     define DJGPP  /* MSDOS running the DJGPP port of GCC */
403 #   endif
404 #   define mach_type_known
405 # endif
406 # if defined(__CYGWIN32__) || defined(__CYGWIN__)
407 #   define I386
408 #   define CYGWIN32
409 #   define mach_type_known
410 # endif
411 # if defined(__MINGW32__)
412 #   define I386
413 #   define MSWIN32
414 #   define mach_type_known
415 # endif
416 # if defined(__BORLANDC__)
417 #   define I386
418 #   define MSWIN32
419 #   define mach_type_known
420 # endif
421 # if defined(_UTS) && !defined(mach_type_known)
422 #   define S370
423 #   define UTS4
424 #   define mach_type_known
425 # endif
426 # if defined(__pj__)
427 #   define PJ
428 #   define mach_type_known
429 # endif
430 # if defined(__embedded__) && defined(PPC)
431 #   define POWERPC
432 #   define NOSYS
433 #   define mach_type_known
434 # endif
435 /* Ivan Demakov */
436 # if defined(__WATCOMC__) && defined(__386__)
437 #   define I386
438 #   if !defined(OS2) && !defined(MSWIN32) && !defined(DOS4GW)
439 #     if defined(__OS2__)
440 #       define OS2
441 #     else
442 #       if defined(__WINDOWS_386__) || defined(__NT__)
443 #         define MSWIN32
444 #       else
445 #         define DOS4GW
446 #       endif
447 #     endif
448 #   endif
449 #   define mach_type_known
450 # endif
451 # if defined(__s390__) && defined(LINUX)
452 #    define S390
453 #    define mach_type_known
454 # endif
455 # if defined(__GNU__)
456 #   if defined(__i386__)
457 /* The Debian Hurd running on generic PC */  
458 #     define  HURD
459 #     define  I386
460 #     define  mach_type_known
461 #    endif 
462 # endif
463
464 /* Feel free to add more clauses here */
465
466 /* Or manually define the machine type here.  A machine type is         */
467 /* characterized by the architecture.  Some                             */
468 /* machine types are further subdivided by OS.                          */
469 /* the macros ULTRIX, RISCOS, and BSD to distinguish.                   */
470 /* Note that SGI IRIX is treated identically to RISCOS.                 */
471 /* SYSV on an M68K actually means A/UX.                                 */
472 /* The distinction in these cases is usually the stack starting address */
473 # ifndef mach_type_known
474         --> unknown machine type
475 # endif
476                     /* Mapping is: M68K       ==> Motorola 680X0        */
477                     /*             (SUNOS4,HP,NEXT, and SYSV (A/UX),    */
478                     /*             MACOS and AMIGA variants)            */
479                     /*             I386       ==> Intel 386             */
480                     /*              (SEQUENT, OS2, SCO, LINUX, NETBSD,  */
481                     /*               FREEBSD, THREE86BSD, MSWIN32,      */
482                     /*               BSDI,SUNOS5, NEXT, other variants) */
483                     /*             NS32K      ==> Encore Multimax       */
484                     /*             MIPS       ==> R2000 or R3000        */
485                     /*                  (RISCOS, ULTRIX variants)       */
486                     /*             VAX        ==> DEC VAX               */
487                     /*                  (BSD, ULTRIX variants)          */
488                     /*             RS6000     ==> IBM RS/6000 AIX3.X    */
489                     /*             RT         ==> IBM PC/RT             */
490                     /*             HP_PA      ==> HP9000/700 & /800     */
491                     /*                            HP/UX, LINUX          */
492                     /*             SPARC      ==> SPARC v7/v8/v9        */
493                     /*                  (SUNOS4, SUNOS5, LINUX,         */
494                     /*                   DRSNX variants)                */
495                     /*             ALPHA      ==> DEC Alpha             */
496                     /*                  (OSF1 and LINUX variants)       */
497                     /*             M88K       ==> Motorola 88XX0        */
498                     /*                  (CX_UX and DGUX)                */
499                     /*             S370       ==> 370-like machine      */
500                     /*                  running Amdahl UTS4             */
501                     /*             S390       ==> 390-like machine      */
502                     /*                  running LINUX                   */
503                     /*             ARM32      ==> Intel StrongARM       */
504                     /*             IA64       ==> Intel IPF             */
505                     /*                            (e.g. Itanium)        */
506                     /*                  (LINUX and HPUX)                */
507                     /*             SH         ==> Hitachi SuperH        */
508                     /*                  (LINUX & MSWINCE)               */
509                     /*             X86_64     ==> AMD x86-64            */
510                     /*             POWERPC    ==> IBM/Apple PowerPC     */
511                     /*                  (MACOS(<=9),DARWIN(incl.MACOSX),*/
512                     /*                   LINUX, NETBSD, NOSYS variants) */
513                     /*                  Handles 32 and 64-bit variants. */
514                     /*                  AIX should be handled here, but */
515                     /*                  that's called an RS6000.        */
516                     /*             CRIS       ==> Axis Etrax            */
517                     /*             M32R       ==> Renesas M32R          */
518
519
520 /*
521  * For each architecture and OS, the following need to be defined:
522  *
523  * CPP_WORDSZ is a simple integer constant representing the word size.
524  * in bits.  We assume byte addressibility, where a byte has 8 bits.
525  * We also assume CPP_WORDSZ is either 32 or 64.
526  * (We care about the length of pointers, not hardware
527  * bus widths.  Thus a 64 bit processor with a C compiler that uses
528  * 32 bit pointers should use CPP_WORDSZ of 32, not 64. Default is 32.)
529  *
530  * MACH_TYPE is a string representation of the machine type.
531  * OS_TYPE is analogous for the OS.
532  *
533  * ALIGNMENT is the largest N, such that
534  * all pointer are guaranteed to be aligned on N byte boundaries.
535  * defining it to be 1 will always work, but perform poorly.
536  *
537  * DATASTART is the beginning of the data segment.
538  * On some platforms SEARCH_FOR_DATA_START is defined.
539  * SEARCH_FOR_DATASTART will cause GC_data_start to
540  * be set to an address determined by accessing data backwards from _end
541  * until an unmapped page is found.  DATASTART will be defined to be
542  * GC_data_start.
543  * On UNIX-like systems, the collector will scan the area between DATASTART
544  * and DATAEND for root pointers.
545  *
546  * DATAEND, if not `end' where `end' is defined as ``extern int end[];''.
547  * RTH suggests gaining access to linker script synth'd values with
548  * this idiom instead of `&end' where `end' is defined as ``extern int end;'' .
549  * Otherwise, ``GCC will assume these are in .sdata/.sbss'' and it will, e.g.,
550  * cause failures on alpha*-*-* with ``-msmall-data or -fpic'' or mips-*-*
551  * without any special options.
552  *
553  * ALIGN_DOUBLE of GC_malloc should return blocks aligned to twice
554  * the pointer size.
555  *
556  * STACKBOTTOM is the cool end of the stack, which is usually the
557  * highest address in the stack.
558  * Under PCR or OS/2, we have other ways of finding thread stacks.
559  * For each machine, the following should:
560  * 1) define STACK_GROWS_UP if the stack grows toward higher addresses, and
561  * 2) define exactly one of
562  *      STACKBOTTOM (should be defined to be an expression)
563  *      LINUX_STACKBOTTOM
564  *      HEURISTIC1
565  *      HEURISTIC2
566  * If STACKBOTTOM is defined, then it's value will be used directly as the
567  * stack base.  If LINUX_STACKBOTTOM is defined, then it will be determined
568  * with a method appropriate for most Linux systems.  Currently we look
569  * first for __libc_stack_end, and if that fails read it from /proc.
570  * If either of the last two macros are defined, then STACKBOTTOM is computed
571  * during collector startup using one of the following two heuristics:
572  * HEURISTIC1:  Take an address inside GC_init's frame, and round it up to
573  *              the next multiple of STACK_GRAN.
574  * HEURISTIC2:  Take an address inside GC_init's frame, increment it repeatedly
575  *              in small steps (decrement if STACK_GROWS_UP), and read the value
576  *              at each location.  Remember the value when the first
577  *              Segmentation violation or Bus error is signalled.  Round that
578  *              to the nearest plausible page boundary, and use that instead
579  *              of STACKBOTTOM.
580  *
581  * Gustavo Rodriguez-Rivera points out that on most (all?) Unix machines,
582  * the value of environ is a pointer that can serve as STACKBOTTOM.
583  * I expect that HEURISTIC2 can be replaced by this approach, which
584  * interferes far less with debugging.  However it has the disadvantage
585  * that it's confused by a putenv call before the collector is initialized.
586  * This could be dealt with by intercepting putenv ...
587  *
588  * If no expression for STACKBOTTOM can be found, and neither of the above
589  * heuristics are usable, the collector can still be used with all of the above
590  * undefined, provided one of the following is done:
591  * 1) GC_mark_roots can be changed to somehow mark from the correct stack(s)
592  *    without reference to STACKBOTTOM.  This is appropriate for use in
593  *    conjunction with thread packages, since there will be multiple stacks.
594  *    (Allocating thread stacks in the heap, and treating them as ordinary
595  *    heap data objects is also possible as a last resort.  However, this is
596  *    likely to introduce significant amounts of excess storage retention
597  *    unless the dead parts of the thread stacks are periodically cleared.)
598  * 2) Client code may set GC_stackbottom before calling any GC_ routines.
599  *    If the author of the client code controls the main program, this is
600  *    easily accomplished by introducing a new main program, setting
601  *    GC_stackbottom to the address of a local variable, and then calling
602  *    the original main program.  The new main program would read something
603  *    like:
604  *
605  *              # include "gc_private.h"
606  *
607  *              main(argc, argv, envp)
608  *              int argc;
609  *              char **argv, **envp;
610  *              {
611  *                  int dummy;
612  *
613  *                  GC_stackbottom = (ptr_t)(&dummy);
614  *                  return(real_main(argc, argv, envp));
615  *              }
616  *
617  *
618  * Each architecture may also define the style of virtual dirty bit
619  * implementation to be used:
620  *   MPROTECT_VDB: Write protect the heap and catch faults.
621  *   PROC_VDB: Use the SVR4 /proc primitives to read dirty bits.
622  *
623  * An architecture may define DYNAMIC_LOADING if dynamic_load.c
624  * defined GC_register_dynamic_libraries() for the architecture.
625  *
626  * An architecture may define PREFETCH(x) to preload the cache with *x.
627  * This defaults to a no-op.
628  *
629  * PREFETCH_FOR_WRITE(x) is used if *x is about to be written.
630  *
631  * An architecture may also define CLEAR_DOUBLE(x) to be a fast way to
632  * clear the two words at GC_malloc-aligned address x.  By default,
633  * word stores of 0 are used instead.
634  *
635  * HEAP_START may be defined as the initial address hint for mmap-based
636  * allocation.
637  */
638
639 /* If we are using a recent version of gcc, we can use __builtin_unwind_init()
640  * to push the relevant registers onto the stack.  This generally makes
641  * USE_GENERIC_PUSH_REGS the preferred approach for marking from registers.
642  */
643 # if defined(__GNUC__) && ((__GNUC__ >= 3) || \
644                            (__GNUC__ == 2 && __GNUC_MINOR__ >= 8)) \
645                        && !defined(__INTEL_COMPILER) \
646                        && !defined(__PATHCC__)
647 #   define HAVE_BUILTIN_UNWIND_INIT
648 # endif
649
650 # define STACK_GRAN 0x1000000
651 # ifdef M68K
652 #   define MACH_TYPE "M68K"
653 #   define ALIGNMENT 2
654 #   ifdef OPENBSD
655 #       define OS_TYPE "OPENBSD"
656 #       define HEURISTIC2
657 #       ifdef __ELF__
658 #         define DATASTART GC_data_start
659 #         define DYNAMIC_LOADING
660 #       else
661           extern char etext[];
662 #         define DATASTART ((ptr_t)(etext))
663 #       endif
664 #       define USE_GENERIC_PUSH_REGS
665 #   endif
666 #   ifdef NETBSD
667 #       define OS_TYPE "NETBSD"
668 #       define HEURISTIC2
669 #       ifdef __ELF__
670 #         define DATASTART GC_data_start
671 #         define DYNAMIC_LOADING
672 #       else
673           extern char etext[];
674 #         define DATASTART ((ptr_t)(etext))
675 #       endif
676 #       define USE_GENERIC_PUSH_REGS
677 #   endif
678 #   ifdef LINUX
679 #       define OS_TYPE "LINUX"
680 #       define LINUX_STACKBOTTOM
681 #       define USE_GENERIC_PUSH_REGS
682                 /* We never got around to the assembly version. */
683 #       define MPROTECT_VDB
684 #       ifdef __ELF__
685 #            define DYNAMIC_LOADING
686 #            include <features.h>
687 #            if defined(__GLIBC__)&& __GLIBC__>=2
688 #              define SEARCH_FOR_DATA_START
689 #            else /* !GLIBC2 */
690                extern char **__environ;
691 #              define DATASTART ((ptr_t)(&__environ))
692                              /* hideous kludge: __environ is the first */
693                              /* word in crt0.o, and delimits the start */
694                              /* of the data segment, no matter which   */
695                              /* ld options were passed through.        */
696                              /* We could use _etext instead, but that  */
697                              /* would include .rodata, which may       */
698                              /* contain large read-only data tables    */
699                              /* that we'd rather not scan.             */
700 #            endif /* !GLIBC2 */
701              extern int _end[];
702 #            define DATAEND (_end)
703 #       else
704              extern int etext[];
705 #            define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
706 #       endif
707 #   endif
708 #   ifdef SUNOS4
709 #       define OS_TYPE "SUNOS4"
710         extern char etext[];
711 #       define DATASTART ((ptr_t)((((word) (etext)) + 0x1ffff) & ~0x1ffff))
712 #       define HEURISTIC1       /* differs      */
713 #       define DYNAMIC_LOADING
714 #   endif
715 #   ifdef HP
716 #       define OS_TYPE "HP"
717         extern char etext[];
718 #       define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
719 #       define STACKBOTTOM ((ptr_t) 0xffeffffc)
720                               /* empirically determined.  seems to work. */
721 #       include <unistd.h>
722 #       define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
723 #   endif
724 #   ifdef SYSV
725 #       define OS_TYPE "SYSV"
726         extern etext[];
727 #       define DATASTART ((ptr_t)((((word) (etext)) + 0x3fffff) \
728                                    & ~0x3fffff) \
729                                   +((word)etext & 0x1fff))
730         /* This only works for shared-text binaries with magic number 0413.
731            The other sorts of SysV binaries put the data at the end of the text,
732            in which case the default of etext would work.  Unfortunately,
733            handling both would require having the magic-number available.
734                                 -- Parag
735            */
736 #       define STACKBOTTOM ((ptr_t)0xFFFFFFFE)
737                         /* The stack starts at the top of memory, but   */
738                         /* 0x0 cannot be used as setjump_test complains */
739                         /* that the stack direction is incorrect.  Two  */
740                         /* bytes down from 0x0 should be safe enough.   */
741                         /*              --Parag                         */
742 #       include <sys/mmu.h>
743 #       define GETPAGESIZE() PAGESIZE   /* Is this still right? */
744 #   endif
745 #   ifdef AMIGA
746 #       define OS_TYPE "AMIGA"
747                 /* STACKBOTTOM and DATASTART handled specially  */
748                 /* in os_dep.c                                  */
749 #       define DATAEND  /* not needed */
750 #       define GETPAGESIZE() 4096
751 #   endif
752 #   ifdef MACOS
753 #     ifndef __LOWMEM__
754 #     include <LowMem.h>
755 #     endif
756 #     define OS_TYPE "MACOS"
757                         /* see os_dep.c for details of global data segments. */
758 #     define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
759 #     define DATAEND    /* not needed */
760 #     define GETPAGESIZE() 4096
761 #   endif
762 #   ifdef NEXT
763 #       define OS_TYPE "NEXT"
764 #       define DATASTART ((ptr_t) get_etext())
765 #       define STACKBOTTOM ((ptr_t) 0x4000000)
766 #       define DATAEND  /* not needed */
767 #   endif
768 # endif
769
770 # if defined(POWERPC)
771 #   define MACH_TYPE "POWERPC"
772 #   ifdef MACOS
773 #     define ALIGNMENT 2  /* Still necessary?  Could it be 4?   */
774 #     ifndef __LOWMEM__
775 #     include <LowMem.h>
776 #     endif
777 #     define OS_TYPE "MACOS"
778                         /* see os_dep.c for details of global data segments. */
779 #     define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
780 #     define DATAEND  /* not needed */
781 #   endif
782 #   ifdef LINUX
783 #     if defined(__powerpc64__)
784 #       define ALIGNMENT 8
785 #       define CPP_WORDSZ 64
786 #       ifndef HBLKSIZE
787 #         define HBLKSIZE 4096
788 #       endif
789 #     else
790 #       define ALIGNMENT 4
791 #     endif
792 #     define OS_TYPE "LINUX"
793       /* HEURISTIC1 has been reliably reported to fail for a 32-bit     */
794       /* executable on a 64 bit kernel.                                 */
795 #     define LINUX_STACKBOTTOM
796 #     define DYNAMIC_LOADING
797 #     define SEARCH_FOR_DATA_START
798       extern int _end[];
799 #     define DATAEND (_end)
800 #   endif
801 #   ifdef DARWIN
802 #     define OS_TYPE "DARWIN"
803 #     define DYNAMIC_LOADING
804 #     if defined(__ppc64__)
805 #       define ALIGNMENT 8
806 #       define CPP_WORDSZ 64
807 #       define STACKBOTTOM ((ptr_t) 0x7fff5fc00000)
808 #       define CACHE_LINE_SIZE 64
809 #       ifndef HBLKSIZE
810 #         define HBLKSIZE 4096
811 #       endif
812 #     else
813 #       define ALIGNMENT 4
814 #       define STACKBOTTOM ((ptr_t) 0xc0000000)
815 #     endif
816       /* XXX: see get_end(3), get_etext() and get_end() should not be used.
817          These aren't used when dyld support is enabled (it is by default) */
818 #     define DATASTART ((ptr_t) get_etext())
819 #     define DATAEND    ((ptr_t) get_end())
820 #     define USE_MMAP
821 #     define USE_MMAP_ANON
822 #     define USE_ASM_PUSH_REGS
823 #     ifdef GC_DARWIN_THREADS
824 #       define MPROTECT_VDB
825 #     endif
826 #     include <unistd.h>
827 #     define GETPAGESIZE() getpagesize()
828 #     if defined(USE_PPC_PREFETCH) && defined(__GNUC__)
829         /* The performance impact of prefetches is untested */
830 #       define PREFETCH(x) \
831           __asm__ __volatile__ ("dcbt 0,%0" : : "r" ((const void *) (x)))
832 #       define PREFETCH_FOR_WRITE(x) \
833           __asm__ __volatile__ ("dcbtst 0,%0" : : "r" ((const void *) (x)))
834 #     endif
835       /* There seems to be some issues with trylock hanging on darwin. This
836          should be looked into some more */
837 #     define NO_PTHREAD_TRYLOCK
838 #   endif
839 #   ifdef FREEBSD
840 #       define ALIGNMENT 4
841 #       define OS_TYPE "FREEBSD"
842 #       ifndef GC_FREEBSD_THREADS
843 #           define MPROTECT_VDB
844 #       endif
845 #       define SIG_SUSPEND SIGUSR1
846 #       define SIG_THR_RESTART SIGUSR2
847 #       define FREEBSD_STACKBOTTOM
848 #       ifdef __ELF__
849 #           define DYNAMIC_LOADING
850 #       endif
851         extern char etext[];
852         extern char * GC_FreeBSDGetDataStart();
853 #       define DATASTART GC_FreeBSDGetDataStart(0x1000, &etext)
854 #   endif
855 #   ifdef NETBSD
856 #     define ALIGNMENT 4
857 #     define OS_TYPE "NETBSD"
858 #     define HEURISTIC2
859       extern char etext[];
860 #     define DATASTART GC_data_start
861 #     define DYNAMIC_LOADING
862 #   endif
863 #   ifdef NOSYS
864 #     define ALIGNMENT 4
865 #     define OS_TYPE "NOSYS"
866       extern void __end[], __dso_handle[];
867 #     define DATASTART (__dso_handle)  /* OK, that's ugly.  */
868 #     define DATAEND (__end)
869         /* Stack starts at 0xE0000000 for the simulator.  */
870 #     undef STACK_GRAN
871 #     define STACK_GRAN 0x10000000
872 #     define HEURISTIC1
873 #   endif
874 # endif
875
876 # ifdef VAX
877 #   define MACH_TYPE "VAX"
878 #   define ALIGNMENT 4  /* Pointers are longword aligned by 4.2 C compiler */
879     extern char etext[];
880 #   define DATASTART ((ptr_t)(etext))
881 #   ifdef BSD
882 #       define OS_TYPE "BSD"
883 #       define HEURISTIC1
884                         /* HEURISTIC2 may be OK, but it's hard to test. */
885 #   endif
886 #   ifdef ULTRIX
887 #       define OS_TYPE "ULTRIX"
888 #       define STACKBOTTOM ((ptr_t) 0x7fffc800)
889 #   endif
890 # endif
891
892 # ifdef RT
893 #   define MACH_TYPE "RT"
894 #   define ALIGNMENT 4
895 #   define DATASTART ((ptr_t) 0x10000000)
896 #   define STACKBOTTOM ((ptr_t) 0x1fffd800)
897 # endif
898
899 # ifdef SPARC
900 #   define MACH_TYPE "SPARC"
901 #   if defined(__arch64__) || defined(__sparcv9)
902 #     define ALIGNMENT 8
903 #     define CPP_WORDSZ 64
904 #     define ELF_CLASS ELFCLASS64
905 #   else
906 #     define ALIGNMENT 4        /* Required by hardware */
907 #     define CPP_WORDSZ 32
908 #   endif
909 #   define ALIGN_DOUBLE
910 #   ifdef SUNOS5
911 #       define OS_TYPE "SUNOS5"
912         extern int _etext[];
913         extern int _end[];
914         extern ptr_t GC_SysVGetDataStart();
915 #       define DATASTART GC_SysVGetDataStart(0x10000, _etext)
916 #       define DATAEND (_end)
917 #       if !defined(USE_MMAP) && defined(REDIRECT_MALLOC)
918 #           define USE_MMAP
919             /* Otherwise we now use calloc.  Mmap may result in the     */
920             /* heap interleaved with thread stacks, which can result in */
921             /* excessive blacklisting.  Sbrk is unusable since it       */
922             /* doesn't interact correctly with the system malloc.       */
923 #       endif
924 #       ifdef USE_MMAP
925 #         define HEAP_START (ptr_t)0x40000000
926 #       else
927 #         define HEAP_START DATAEND
928 #       endif
929 #       define PROC_VDB
930 /*      HEURISTIC1 reportedly no longer works under 2.7.                */
931 /*      HEURISTIC2 probably works, but this appears to be preferable.   */
932 /*      Apparently USRSTACK is defined to be USERLIMIT, but in some     */
933 /*      installations that's undefined.  We work around this with a     */
934 /*      gross hack:                                                     */
935 #       include <sys/vmparam.h>
936 #       ifdef USERLIMIT
937           /* This should work everywhere, but doesn't.  */
938 #         define STACKBOTTOM USRSTACK
939 #       else
940 #         define HEURISTIC2
941 #       endif
942 #       include <unistd.h>
943 #       define GETPAGESIZE()  sysconf(_SC_PAGESIZE)
944                 /* getpagesize() appeared to be missing from at least one */
945                 /* Solaris 5.4 installation.  Weird.                      */
946 #       define DYNAMIC_LOADING
947 #   endif
948 #   ifdef SUNOS4
949 #       define OS_TYPE "SUNOS4"
950         /* [If you have a weak stomach, don't read this.]               */
951         /* We would like to use:                                        */
952 /* #       define DATASTART ((ptr_t)((((word) (etext)) + 0x1fff) & ~0x1fff)) */
953         /* This fails occasionally, due to an ancient, but very         */
954         /* persistent ld bug.  etext is set 32 bytes too high.          */
955         /* We instead read the text segment size from the a.out         */
956         /* header, which happens to be mapped into our address space    */
957         /* at the start of the text segment.  The detective work here   */
958         /* was done by Robert Ehrlich, Manuel Serrano, and Bernard      */
959         /* Serpette of INRIA.                                           */
960         /* This assumes ZMAGIC, i.e. demand-loadable executables.       */
961 #       define TEXTSTART 0x2000
962 #       define DATASTART ((ptr_t)(*(int *)(TEXTSTART+0x4)+TEXTSTART))
963 #       define MPROTECT_VDB
964 #       define HEURISTIC1
965 #       define DYNAMIC_LOADING
966 #   endif
967 #   ifdef DRSNX
968 #       define OS_TYPE "DRSNX"
969         extern ptr_t GC_SysVGetDataStart();
970         extern int etext[];
971 #       define DATASTART GC_SysVGetDataStart(0x10000, etext)
972 #       define MPROTECT_VDB
973 #       define STACKBOTTOM ((ptr_t) 0xdfff0000)
974 #       define DYNAMIC_LOADING
975 #   endif
976 #   ifdef LINUX
977 #     define OS_TYPE "LINUX"
978 #     ifdef __ELF__
979 #       define DYNAMIC_LOADING
980 #     else
981           Linux Sparc/a.out not supported
982 #     endif
983       extern int _end[];
984       extern int _etext[];
985 #     define DATAEND (_end)
986 #     define SVR4
987       extern ptr_t GC_SysVGetDataStart();
988 #     ifdef __arch64__
989 #       define DATASTART GC_SysVGetDataStart(0x100000, _etext)
990 #     else
991 #       define DATASTART GC_SysVGetDataStart(0x10000, _etext)
992 #     endif
993 #     define LINUX_STACKBOTTOM
994 #   endif
995 #   ifdef OPENBSD
996 #     define OS_TYPE "OPENBSD"
997 #     define STACKBOTTOM ((ptr_t) 0xf8000000)
998       extern int etext[];
999 #     define DATASTART ((ptr_t)(etext))
1000 #   endif
1001 #   ifdef NETBSD
1002 #     define OS_TYPE "NETBSD"
1003 #     define HEURISTIC2
1004 #     ifdef __ELF__
1005 #       define DATASTART GC_data_start
1006 #       define DYNAMIC_LOADING
1007 #     else
1008         extern char etext[];
1009 #       define DATASTART ((ptr_t)(etext))
1010 #     endif
1011 #   endif
1012 #   ifdef FREEBSD
1013 #       define OS_TYPE "FREEBSD"
1014 #       define SIG_SUSPEND SIGUSR1
1015 #       define SIG_THR_RESTART SIGUSR2
1016 #       define FREEBSD_STACKBOTTOM
1017 #       ifdef __ELF__
1018 #           define DYNAMIC_LOADING
1019 #       endif
1020         extern char etext[];
1021         extern char edata[];
1022         extern char end[];
1023 #       define NEED_FIND_LIMIT
1024 #       define DATASTART ((ptr_t)(&etext))
1025 #       define DATAEND (GC_find_limit (DATASTART, TRUE))
1026 #       define DATASTART2 ((ptr_t)(&edata))
1027 #       define DATAEND2 ((ptr_t)(&end))
1028 #   endif
1029 # endif
1030
1031 # ifdef I386
1032 #   define MACH_TYPE "I386"
1033 #   if defined(__LP64__) || defined(_WIN64)
1034 #     define CPP_WORDSZ 64
1035 #     define ALIGNMENT 8
1036 #   else
1037 #     define CPP_WORDSZ 32
1038 #     define ALIGNMENT 4
1039                         /* Appears to hold for all "32 bit" compilers   */
1040                         /* except Borland.  The -a4 option fixes        */
1041                         /* Borland.                                     */
1042                         /* Ivan Demakov: For Watcom the option is -zp4. */
1043 #   endif
1044 #   ifndef SMALL_CONFIG
1045 #     define ALIGN_DOUBLE /* Not strictly necessary, but may give speed   */
1046                           /* improvement on Pentiums.                     */
1047 #   endif
1048 #   ifdef HAVE_BUILTIN_UNWIND_INIT
1049 #       define USE_GENERIC_PUSH_REGS
1050 #   endif
1051 #   ifdef SEQUENT
1052 #       define OS_TYPE "SEQUENT"
1053         extern int etext[];
1054 #       define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1055 #       define STACKBOTTOM ((ptr_t) 0x3ffff000) 
1056 #   endif
1057 #   ifdef BEOS
1058 #     define OS_TYPE "BEOS"
1059 #     include <OS.h>
1060 #     define GETPAGESIZE() B_PAGE_SIZE
1061       extern int etext[];
1062 #     define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1063 #   endif
1064 #   ifdef SUNOS5
1065 #       define OS_TYPE "SUNOS5"
1066         extern int _etext[], _end[];
1067         extern ptr_t GC_SysVGetDataStart();
1068 #       define DATASTART GC_SysVGetDataStart(0x1000, _etext)
1069 #       define DATAEND (_end)
1070 /*      # define STACKBOTTOM ((ptr_t)(_start)) worked through 2.7,      */
1071 /*      but reportedly breaks under 2.8.  It appears that the stack     */
1072 /*      base is a property of the executable, so this should not break  */
1073 /*      old executables.                                                */
1074 /*      HEURISTIC2 probably works, but this appears to be preferable.   */
1075 #       include <sys/vm.h>
1076 #       define STACKBOTTOM USRSTACK
1077 /* At least in Solaris 2.5, PROC_VDB gives wrong values for dirty bits. */
1078 /* It appears to be fixed in 2.8 and 2.9.                               */
1079 #       ifdef SOLARIS25_PROC_VDB_BUG_FIXED
1080 #         define PROC_VDB
1081 #       endif
1082 #       define DYNAMIC_LOADING
1083 #       if !defined(USE_MMAP) && defined(REDIRECT_MALLOC)
1084 #           define USE_MMAP
1085             /* Otherwise we now use calloc.  Mmap may result in the     */
1086             /* heap interleaved with thread stacks, which can result in */
1087             /* excessive blacklisting.  Sbrk is unusable since it       */
1088             /* doesn't interact correctly with the system malloc.       */
1089 #       endif
1090 #       ifdef USE_MMAP
1091 #         define HEAP_START (ptr_t)0x40000000
1092 #       else
1093 #         define HEAP_START DATAEND
1094 #       endif
1095 #   endif
1096 #   ifdef SCO
1097 #       define OS_TYPE "SCO"
1098         extern int etext[];
1099 #       define DATASTART ((ptr_t)((((word) (etext)) + 0x3fffff) \
1100                                   & ~0x3fffff) \
1101                                  +((word)etext & 0xfff))
1102 #       define STACKBOTTOM ((ptr_t) 0x7ffffffc)
1103 #   endif
1104 #   ifdef SCO_ELF
1105 #       define OS_TYPE "SCO_ELF"
1106         extern int etext[];
1107 #       define DATASTART ((ptr_t)(etext))
1108 #       define STACKBOTTOM ((ptr_t) 0x08048000)
1109 #       define DYNAMIC_LOADING
1110 #       define ELF_CLASS ELFCLASS32
1111 #   endif
1112 #   ifdef DGUX
1113 #       define OS_TYPE "DGUX"
1114         extern int _etext, _end;
1115         extern ptr_t GC_SysVGetDataStart();
1116 #       define DATASTART GC_SysVGetDataStart(0x1000, &_etext)
1117 #       define DATAEND (&_end)
1118 #       define STACK_GROWS_DOWN
1119 #       define HEURISTIC2
1120 #       include <unistd.h>
1121 #       define GETPAGESIZE()  sysconf(_SC_PAGESIZE)
1122 #       define DYNAMIC_LOADING
1123 #       ifndef USE_MMAP
1124 #         define USE_MMAP
1125 #       endif /* USE_MMAP */
1126 #       define MAP_FAILED (void *) -1
1127 #       ifdef USE_MMAP
1128 #         define HEAP_START (ptr_t)0x40000000
1129 #       else /* USE_MMAP */
1130 #         define HEAP_START DATAEND
1131 #       endif /* USE_MMAP */
1132 #   endif /* DGUX */
1133
1134 #   ifdef LINUX
1135 #       ifndef __GNUC__
1136           /* The Intel compiler doesn't like inline assembly */
1137 #         define USE_GENERIC_PUSH_REGS
1138 #       endif
1139 #       define OS_TYPE "LINUX"
1140 #       define LINUX_STACKBOTTOM
1141 #       if 0
1142 #         define HEURISTIC1
1143 #         undef STACK_GRAN
1144 #         define STACK_GRAN 0x10000000
1145           /* STACKBOTTOM is usually 0xc0000000, but this changes with   */
1146           /* different kernel configurations.  In particular, systems   */
1147           /* with 2GB physical memory will usually move the user        */
1148           /* address space limit, and hence initial SP to 0x80000000.   */
1149 #       endif
1150 #       if !defined(GC_LINUX_THREADS) || !defined(REDIRECT_MALLOC)
1151 #           define MPROTECT_VDB
1152 #       else
1153             /* We seem to get random errors in incremental mode,        */
1154             /* possibly because Linux threads is itself a malloc client */
1155             /* and can't deal with the signals.                         */
1156 #       endif
1157 #       define HEAP_START (ptr_t)0x1000
1158                 /* This encourages mmap to give us low addresses,       */
1159                 /* thus allowing the heap to grow to ~3GB               */
1160 #       ifdef __ELF__
1161 #            define DYNAMIC_LOADING
1162 #            ifdef UNDEFINED    /* includes ro data */
1163                extern int _etext[];
1164 #              define DATASTART ((ptr_t)((((word) (_etext)) + 0xfff) & ~0xfff))
1165 #            endif
1166 #            include <features.h>
1167 #            if defined(__GLIBC__) && __GLIBC__ >= 2
1168 #                define SEARCH_FOR_DATA_START
1169 #            else
1170                  extern char **__environ;
1171 #                define DATASTART ((ptr_t)(&__environ))
1172                               /* hideous kludge: __environ is the first */
1173                               /* word in crt0.o, and delimits the start */
1174                               /* of the data segment, no matter which   */
1175                               /* ld options were passed through.        */
1176                               /* We could use _etext instead, but that  */
1177                               /* would include .rodata, which may       */
1178                               /* contain large read-only data tables    */
1179                               /* that we'd rather not scan.             */
1180 #            endif
1181              extern int _end[];
1182 #            define DATAEND (_end)
1183 #       else
1184              extern int etext[];
1185 #            define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1186 #       endif
1187 #       ifdef USE_I686_PREFETCH
1188           /* FIXME: Thus should use __builtin_prefetch, but we'll leave that    */
1189           /* for the next rtelease.                                             */
1190 #         define PREFETCH(x) \
1191             __asm__ __volatile__ ("     prefetchnta     %0": : "m"(*(char *)(x)))
1192             /* Empirically prefetcht0 is much more effective at reducing        */
1193             /* cache miss stalls for the targetted load instructions.  But it   */
1194             /* seems to interfere enough with other cache traffic that the net  */
1195             /* result is worse than prefetchnta.                                */
1196 #         if 0 
1197             /* Using prefetches for write seems to have a slight negative       */
1198             /* impact on performance, at least for a PIII/500.                  */
1199 #           define PREFETCH_FOR_WRITE(x) \
1200               __asm__ __volatile__ ("   prefetcht0      %0": : "m"(*(char *)(x)))
1201 #         endif
1202 #       endif
1203 #       ifdef USE_3DNOW_PREFETCH
1204 #         define PREFETCH(x) \
1205             __asm__ __volatile__ ("     prefetch        %0": : "m"(*(char *)(x)))
1206 #         define PREFETCH_FOR_WRITE(x) \
1207             __asm__ __volatile__ ("     prefetchw       %0": : "m"(*(char *)(x)))
1208 #       endif
1209 #   endif
1210 #   ifdef CYGWIN32
1211 #       define OS_TYPE "CYGWIN32"
1212 #       define DATASTART ((ptr_t)GC_DATASTART)  /* From gc.h */
1213 #       define DATAEND   ((ptr_t)GC_DATAEND)
1214 #       undef STACK_GRAN
1215 #       define STACK_GRAN 0x10000
1216 #       define HEURISTIC1
1217 #   endif
1218 #   ifdef OS2
1219 #       define OS_TYPE "OS2"
1220                 /* STACKBOTTOM and DATASTART are handled specially in   */
1221                 /* os_dep.c. OS2 actually has the right                 */
1222                 /* system call!                                         */
1223 #       define DATAEND  /* not needed */
1224 #       define USE_GENERIC_PUSH_REGS
1225 #   endif
1226 #   ifdef MSWIN32
1227 #       define OS_TYPE "MSWIN32"
1228                 /* STACKBOTTOM and DATASTART are handled specially in   */
1229                 /* os_dep.c.                                            */
1230 #       ifndef __WATCOMC__
1231 #         define MPROTECT_VDB
1232 #       endif
1233 #       define DATAEND  /* not needed */
1234 #   endif
1235 #   ifdef MSWINCE
1236 #       define OS_TYPE "MSWINCE"
1237 #       define DATAEND  /* not needed */
1238 #   endif
1239 #   ifdef DJGPP
1240 #       define OS_TYPE "DJGPP"
1241 #       include "stubinfo.h"
1242         extern int etext[];
1243         extern int _stklen;
1244         extern int __djgpp_stack_limit;
1245 #       define DATASTART ((ptr_t)((((word) (etext)) + 0x1ff) & ~0x1ff))
1246 /* #       define STACKBOTTOM ((ptr_t)((word) _stubinfo + _stubinfo->size \
1247                                                      + _stklen)) */
1248 #       define STACKBOTTOM ((ptr_t)((word) __djgpp_stack_limit + _stklen))
1249                 /* This may not be right.  */
1250 #   endif
1251 #   ifdef OPENBSD
1252 #       define OS_TYPE "OPENBSD"
1253 #   endif
1254 #   ifdef FREEBSD
1255 #       define OS_TYPE "FREEBSD"
1256 #       ifndef GC_FREEBSD_THREADS
1257 #           define MPROTECT_VDB
1258 #       endif
1259 #       ifdef __GLIBC__
1260 #           define SIG_SUSPEND          (32+6)
1261 #           define SIG_THR_RESTART      (32+5)
1262             extern int _end[];
1263 #           define DATAEND (_end)
1264 #       else
1265 #           define SIG_SUSPEND SIGUSR1
1266 #           define SIG_THR_RESTART SIGUSR2
1267 #       endif
1268 #       define FREEBSD_STACKBOTTOM
1269 #       ifdef __ELF__
1270 #           define DYNAMIC_LOADING
1271 #       endif
1272         extern char etext[];
1273         extern char * GC_FreeBSDGetDataStart();
1274 #       define DATASTART GC_FreeBSDGetDataStart(0x1000, &etext)
1275 #   endif
1276 #   ifdef NETBSD
1277 #       define OS_TYPE "NETBSD"
1278 #       ifdef __ELF__
1279 #           define DYNAMIC_LOADING
1280 #       endif
1281 #   endif
1282 #   ifdef THREE86BSD
1283 #       define OS_TYPE "THREE86BSD"
1284 #   endif
1285 #   ifdef BSDI
1286 #       define OS_TYPE "BSDI"
1287 #   endif
1288 #   if defined(OPENBSD) || defined(NETBSD) \
1289         || defined(THREE86BSD) || defined(BSDI)
1290 #       define HEURISTIC2
1291         extern char etext[];
1292 #       define DATASTART ((ptr_t)(etext))
1293 #   endif
1294 #   ifdef NEXT
1295 #       define OS_TYPE "NEXT"
1296 #       define DATASTART ((ptr_t) get_etext())
1297 #       define STACKBOTTOM ((ptr_t)0xc0000000)
1298 #       define DATAEND  /* not needed */
1299 #   endif
1300 #   ifdef DOS4GW
1301 #     define OS_TYPE "DOS4GW"
1302       extern long __nullarea;
1303       extern char _end;
1304       extern char *_STACKTOP;
1305       /* Depending on calling conventions Watcom C either precedes
1306          or does not precedes with undescore names of C-variables.
1307          Make sure startup code variables always have the same names.  */
1308       #pragma aux __nullarea "*";
1309       #pragma aux _end "*";
1310 #     define STACKBOTTOM ((ptr_t) _STACKTOP)
1311                          /* confused? me too. */
1312 #     define DATASTART ((ptr_t) &__nullarea)
1313 #     define DATAEND ((ptr_t) &_end)
1314 #   endif
1315 #   ifdef HURD
1316 #     define OS_TYPE "HURD"
1317 #     define STACK_GROWS_DOWN
1318 #     define HEURISTIC2
1319       extern int  __data_start[];
1320 #     define DATASTART ( (ptr_t) (__data_start))
1321       extern int   _end[];
1322 #     define DATAEND ( (ptr_t) (_end))
1323 /* #     define MPROTECT_VDB  Not quite working yet? */
1324 #     define DYNAMIC_LOADING
1325 #   endif
1326 #   ifdef DARWIN
1327 #     define OS_TYPE "DARWIN"
1328 #     define DARWIN_DONT_PARSE_STACK
1329 #     define DYNAMIC_LOADING
1330       /* XXX: see get_end(3), get_etext() and get_end() should not be used.
1331          These aren't used when dyld support is enabled (it is by default) */
1332 #     define DATASTART ((ptr_t) get_etext())
1333 #     define DATAEND    ((ptr_t) get_end())
1334 #     define STACKBOTTOM ((ptr_t) 0xc0000000)
1335 #     define USE_MMAP
1336 #     define USE_MMAP_ANON
1337 #     define USE_ASM_PUSH_REGS
1338 #     ifdef GC_DARWIN_THREADS
1339 #       define MPROTECT_VDB
1340 #     endif
1341 #     include <unistd.h>
1342 #     define GETPAGESIZE() getpagesize()
1343       /* There seems to be some issues with trylock hanging on darwin. This
1344          should be looked into some more */
1345 #     define NO_PTHREAD_TRYLOCK
1346 #   endif /* DARWIN */
1347 # endif
1348
1349 # ifdef NS32K
1350 #   define MACH_TYPE "NS32K"
1351 #   define ALIGNMENT 4
1352     extern char **environ;
1353 #   define DATASTART ((ptr_t)(&environ))
1354                               /* hideous kludge: environ is the first   */
1355                               /* word in crt0.o, and delimits the start */
1356                               /* of the data segment, no matter which   */
1357                               /* ld options were passed through.        */
1358 #   define STACKBOTTOM ((ptr_t) 0xfffff000) /* for Encore */
1359 # endif
1360
1361 # ifdef MIPS
1362 #   define MACH_TYPE "MIPS"
1363 #   ifdef LINUX
1364       /* This was developed for a linuxce style platform.  Probably     */
1365       /* needs to be tweaked for workstation class machines.            */
1366 #     define OS_TYPE "LINUX"
1367 #     define DYNAMIC_LOADING
1368       extern int _end[];
1369 #     define DATAEND (_end)
1370       extern int __data_start[];
1371 #     define DATASTART ((ptr_t)(__data_start))
1372 #     ifdef _MIPS_SZPTR
1373 #       define CPP_WORDSZ _MIPS_SZPTR
1374 #       define ALIGNMENT (_MIPS_SZPTR/8)
1375 #     else
1376 #       define ALIGNMENT 4
1377 #     endif
1378 #     ifndef HBLKSIZE
1379 #       define HBLKSIZE 4096
1380 #     endif
1381 #     define USE_GENERIC_PUSH_REGS
1382 #     if __GLIBC__ == 2 && __GLIBC_MINOR__ >= 2 || __GLIBC__ > 2
1383 #        define LINUX_STACKBOTTOM
1384 #     else
1385 #        define STACKBOTTOM 0x80000000
1386 #     endif
1387 #   endif /* Linux */
1388 #   ifdef EWS4800
1389 #      define HEURISTIC2
1390 #      if defined(_MIPS_SZPTR) && (_MIPS_SZPTR == 64)
1391          extern int _fdata[], _end[];
1392 #        define DATASTART ((ptr_t)_fdata)
1393 #        define DATAEND ((ptr_t)_end)
1394 #        define CPP_WORDSZ _MIPS_SZPTR
1395 #        define ALIGNMENT (_MIPS_SZPTR/8)
1396 #      else
1397          extern int etext[], edata[], end[];
1398          extern int _DYNAMIC_LINKING[], _gp[];
1399 #        define DATASTART ((ptr_t)((((word)etext + 0x3ffff) & ~0x3ffff) \
1400                + ((word)etext & 0xffff)))
1401 #        define DATAEND (edata)
1402 #        define DATASTART2 (_DYNAMIC_LINKING \
1403                ? (ptr_t)(((word)_gp + 0x8000 + 0x3ffff) & ~0x3ffff) \
1404                : (ptr_t)edata)
1405 #        define DATAEND2 (end)
1406 #        define ALIGNMENT 4
1407 #      endif
1408 #      define OS_TYPE "EWS4800"
1409 #      define USE_GENERIC_PUSH_REGS 1
1410 #   endif
1411 #   ifdef ULTRIX
1412 #       define HEURISTIC2
1413 #       define DATASTART (ptr_t)0x10000000
1414                               /* Could probably be slightly higher since */
1415                               /* startup code allocates lots of stuff.   */
1416 #       define OS_TYPE "ULTRIX"
1417 #       define ALIGNMENT 4
1418 #   endif
1419 #   ifdef RISCOS
1420 #       define HEURISTIC2
1421 #       define DATASTART (ptr_t)0x10000000
1422 #       define OS_TYPE "RISCOS"
1423 #       define ALIGNMENT 4  /* Required by hardware */
1424 #   endif
1425 #   ifdef IRIX5
1426 #       define HEURISTIC2
1427         extern int _fdata[];
1428 #       define DATASTART ((ptr_t)(_fdata))
1429 #       ifdef USE_MMAP
1430 #         define HEAP_START (ptr_t)0x30000000
1431 #       else
1432 #         define HEAP_START DATASTART
1433 #       endif
1434                               /* Lowest plausible heap address.         */
1435                               /* In the MMAP case, we map there.        */
1436                               /* In either case it is used to identify  */
1437                               /* heap sections so they're not           */
1438                               /* considered as roots.                   */
1439 #       define OS_TYPE "IRIX5"
1440 /*#       define MPROTECT_VDB DOB: this should work, but there is evidence */
1441 /*              of recent breakage.                                        */
1442 #       ifdef _MIPS_SZPTR
1443 #         define CPP_WORDSZ _MIPS_SZPTR
1444 #         define ALIGNMENT (_MIPS_SZPTR/8)
1445 #         if CPP_WORDSZ != 64
1446 #           define ALIGN_DOUBLE
1447 #         endif
1448 #         if _MIPS_SZPTR == 64
1449 #           define ELF_CLASS ELFCLASS64
1450 #         endif
1451 #       else
1452 #         define ALIGNMENT 4
1453 #         define ALIGN_DOUBLE
1454 #       endif
1455 #       define DYNAMIC_LOADING
1456 #   endif
1457 #   ifdef MSWINCE
1458 #       define OS_TYPE "MSWINCE"
1459 #       define ALIGNMENT 4
1460 #       define DATAEND /* not needed */
1461 #   endif
1462 #   if defined(NETBSD)
1463 #     define ALIGNMENT 4
1464 #     define OS_TYPE "NETBSD"
1465 #     define HEURISTIC2
1466 #     define USE_GENERIC_PUSH_REGS
1467 #     ifdef __ELF__
1468         extern int etext[];
1469 #       define DATASTART GC_data_start
1470 #       define NEED_FIND_LIMIT
1471 #       define DYNAMIC_LOADING
1472 #     else
1473 #       define DATASTART ((ptr_t) 0x10000000)
1474 #       define STACKBOTTOM ((ptr_t) 0x7ffff000)
1475 #     endif /* _ELF_ */
1476 #  endif
1477 # endif
1478
1479 # ifdef RS6000
1480 #   define MACH_TYPE "RS6000"
1481 #   ifdef ALIGNMENT
1482 #     undef ALIGNMENT
1483 #   endif
1484 #   ifdef IA64
1485 #     undef IA64 /* DOB: some AIX installs stupidly define IA64 in /usr/include/sys/systemcfg.h */
1486 #   endif
1487 #   ifdef __64BIT__
1488 #     define ALIGNMENT 8
1489 #     define CPP_WORDSZ 64
1490 #     define STACKBOTTOM ((ptr_t)0x1000000000000000)
1491 #   else
1492 #     define ALIGNMENT 4
1493 #     define CPP_WORDSZ 32
1494 #     define STACKBOTTOM ((ptr_t)((ulong)&errno))
1495 #   endif
1496 #   define USE_MMAP
1497 #   define USE_MMAP_ANON
1498  /* From AIX linker man page:
1499  _text Specifies the first location of the program.
1500  _etext Specifies the first location after the program.
1501  _data Specifies the first location of the data.
1502  _edata Specifies the first location after the initialized data
1503  _end or end Specifies the first location after all data.
1504  */
1505     extern int _data[], _end[];
1506 #   define DATASTART ((ptr_t)((ulong)_data))
1507 #   define DATAEND ((ptr_t)((ulong)_end))
1508     extern int errno;
1509 #   define USE_GENERIC_PUSH_REGS
1510 #   define DYNAMIC_LOADING
1511         /* For really old versions of AIX, this may have to be removed. */
1512 # endif
1513
1514 # ifdef HP_PA
1515 #   define MACH_TYPE "HP_PA"
1516 #   ifdef __LP64__
1517 #     define CPP_WORDSZ 64
1518 #     define ALIGNMENT 8
1519 #   else
1520 #     define CPP_WORDSZ 32
1521 #     define ALIGNMENT 4
1522 #     define ALIGN_DOUBLE
1523 #   endif
1524 #   if !defined(GC_HPUX_THREADS) && !defined(GC_LINUX_THREADS)
1525 #     ifndef LINUX /* For now. */
1526 #       define MPROTECT_VDB
1527 #     endif
1528 #   else
1529 #     define GENERIC_COMPARE_AND_SWAP
1530         /* No compare-and-swap instruction.  Use pthread mutexes        */
1531         /* when we absolutely have to.                                  */
1532 #     ifdef PARALLEL_MARK
1533 #       define USE_MARK_BYTES
1534                 /* Minimize compare-and-swap usage.             */
1535 #     endif
1536 #   endif
1537 #   define STACK_GROWS_UP
1538 #   ifdef HPUX
1539 #     define OS_TYPE "HPUX"
1540       extern int __data_start[];
1541 #     define DATASTART ((ptr_t)(__data_start))
1542 #     if 0
1543         /* The following appears to work for 7xx systems running HP/UX  */
1544         /* 9.xx Furthermore, it might result in much faster             */
1545         /* collections than HEURISTIC2, which may involve scanning      */
1546         /* segments that directly precede the stack.  It is not the     */
1547         /* default, since it may not work on older machine/OS           */
1548         /* combinations. (Thanks to Raymond X.T. Nijssen for uncovering */
1549         /* this.)                                                       */
1550 #       define STACKBOTTOM ((ptr_t) 0x7b033000)  /* from /etc/conf/h/param.h */
1551 #     else
1552         /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2       */
1553         /* to this.  Note that the GC must be initialized before the    */
1554         /* first putenv call.                                           */
1555         extern char ** environ;
1556 #       define STACKBOTTOM ((ptr_t)environ)
1557 #     endif
1558 #     define DYNAMIC_LOADING
1559 #     include <unistd.h>
1560 #     define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1561 #     ifndef __GNUC__
1562 #       define PREFETCH(x)  { \
1563                               register long addr = (long)(x); \
1564                               (void) _asm ("LDW", 0, 0, addr, 0); \
1565                             }
1566 #     endif
1567 #   endif /* HPUX */
1568 #   ifdef LINUX
1569 #     define OS_TYPE "LINUX"
1570 #     define LINUX_STACKBOTTOM
1571 #     define DYNAMIC_LOADING
1572 #     define SEARCH_FOR_DATA_START
1573       extern int _end[];
1574 #     define DATAEND (&_end)
1575 #   endif /* LINUX */
1576 # endif /* HP_PA */
1577
1578 # ifdef ALPHA
1579 #   define MACH_TYPE "ALPHA"
1580 #   define ALIGNMENT 8
1581 #   define CPP_WORDSZ 64
1582 #   ifndef LINUX
1583 #     define USE_GENERIC_PUSH_REGS
1584       /* Gcc and probably the DEC/Compaq compiler spill pointers to preserved */
1585       /* fp registers in some cases when the target is a 21264.  The assembly */
1586       /* code doesn't handle that yet, and version dependencies make that a   */
1587       /* bit tricky.  Do the easy thing for now.                                    */
1588 #   endif
1589 #   ifdef NETBSD
1590 #       define OS_TYPE "NETBSD"
1591 #       define HEURISTIC2
1592 #       define DATASTART GC_data_start
1593 #       define ELFCLASS32 32
1594 #       define ELFCLASS64 64
1595 #       define ELF_CLASS ELFCLASS64
1596 #       define DYNAMIC_LOADING
1597 #   endif
1598 #   ifdef OPENBSD
1599 #       define OS_TYPE "OPENBSD"
1600 #       define HEURISTIC2
1601 #       ifdef __ELF__   /* since OpenBSD/Alpha 2.9 */
1602 #          define DATASTART GC_data_start
1603 #          define ELFCLASS32 32
1604 #          define ELFCLASS64 64
1605 #          define ELF_CLASS ELFCLASS64
1606 #       else            /* ECOFF, until OpenBSD/Alpha 2.7 */
1607 #          define DATASTART ((ptr_t) 0x140000000)
1608 #       endif
1609 #   endif
1610 #   ifdef FREEBSD
1611 #       define OS_TYPE "FREEBSD"
1612 /* MPROTECT_VDB is not yet supported at all on FreeBSD/alpha. */
1613 #       define SIG_SUSPEND SIGUSR1
1614 #       define SIG_THR_RESTART SIGUSR2
1615 #       define FREEBSD_STACKBOTTOM
1616 #       ifdef __ELF__
1617 #           define DYNAMIC_LOADING
1618 #       endif
1619 /* Handle unmapped hole alpha*-*-freebsd[45]* puts between etext and edata. */
1620         extern char etext[];
1621         extern char edata[];
1622         extern char end[];
1623 #       define NEED_FIND_LIMIT
1624 #       define DATASTART ((ptr_t)(&etext))
1625 #       define DATAEND (GC_find_limit (DATASTART, TRUE))
1626 #       define DATASTART2 ((ptr_t)(&edata))
1627 #       define DATAEND2 ((ptr_t)(&end))
1628 #   endif
1629 #   ifdef OSF1
1630 #       define OS_TYPE "OSF1"
1631 #       define DATASTART ((ptr_t) 0x140000000)
1632         extern int _end[];
1633 #       define DATAEND ((ptr_t) &_end)
1634         extern char ** environ;
1635         /* round up from the value of environ to the nearest page boundary */
1636         /* Probably breaks if putenv is called before collector            */
1637         /* initialization.                                                 */
1638 #       define STACKBOTTOM ((ptr_t)(((word)(environ) | (getpagesize()-1))+1))
1639 /* #    define HEURISTIC2 */
1640         /* Normally HEURISTIC2 is too conervative, since                */
1641         /* the text segment immediately follows the stack.              */
1642         /* Hence we give an upper pound.                                */
1643         /* This is currently unused, since we disabled HEURISTIC2       */
1644         extern int __start[];
1645 #       define HEURISTIC2_LIMIT ((ptr_t)((word)(__start) & ~(getpagesize()-1)))
1646 #       ifndef GC_OSF1_THREADS
1647           /* Unresolved signal issues with threads.     */
1648 #         define MPROTECT_VDB
1649 #       endif
1650 #       define DYNAMIC_LOADING
1651 #   endif
1652 #   ifdef LINUX
1653 #       define OS_TYPE "LINUX"
1654 #       define LINUX_STACKBOTTOM
1655 #       ifdef __ELF__
1656 #         define SEARCH_FOR_DATA_START
1657 #         define DYNAMIC_LOADING
1658 #       else
1659 #           define DATASTART ((ptr_t) 0x140000000)
1660 #       endif
1661         extern int _end[];
1662 #       define DATAEND (_end)
1663 #       define MPROTECT_VDB
1664                 /* Has only been superficially tested.  May not */
1665                 /* work on all versions.                        */
1666 #   endif
1667 # endif
1668
1669 # ifdef IA64
1670 #   define MACH_TYPE "IA64"
1671 #   define USE_GENERIC_PUSH_REGS
1672         /* We need to get preserved registers in addition to register   */
1673         /* windows.   That's easiest to do with setjmp.                 */
1674 #   ifdef PARALLEL_MARK
1675 #       define USE_MARK_BYTES
1676             /* Compare-and-exchange is too expensive to use for         */
1677             /* setting mark bits.                                       */
1678 #   endif
1679 #   ifdef HPUX
1680 #       ifdef _ILP32
1681 #         define CPP_WORDSZ 32
1682 #         define ALIGN_DOUBLE
1683             /* Requires 8 byte alignment for malloc */
1684 #         define ALIGNMENT 4
1685 #       else
1686 #         ifndef _LP64
1687                 ---> unknown ABI
1688 #         endif
1689 #         define CPP_WORDSZ 64
1690 #         define ALIGN_DOUBLE
1691             /* Requires 16 byte alignment for malloc */
1692 #         define ALIGNMENT 8
1693 #       endif
1694 #       define OS_TYPE "HPUX"   
1695         extern int __data_start[];
1696 #       define DATASTART ((ptr_t)(__data_start))
1697         /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2       */
1698         /* to this.  Note that the GC must be initialized before the    */
1699         /* first putenv call.                                           */
1700         extern char ** environ;
1701 #       define STACKBOTTOM ((ptr_t)environ)
1702 #       define HPUX_STACKBOTTOM
1703 #       define DYNAMIC_LOADING
1704 #       include <unistd.h>
1705 #       define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1706         /* The following was empirically determined, and is probably    */
1707         /* not very robust.                                             */
1708         /* Note that the backing store base seems to be at a nice       */
1709         /* address minus one page.                                      */
1710 #       define BACKING_STORE_DISPLACEMENT 0x1000000
1711 #       define BACKING_STORE_ALIGNMENT 0x1000
1712         extern ptr_t GC_register_stackbottom;
1713 #       define BACKING_STORE_BASE GC_register_stackbottom
1714         /* Known to be wrong for recent HP/UX versions!!!       */
1715 #   endif
1716 #   ifdef LINUX
1717 #       define CPP_WORDSZ 64
1718 #       define ALIGN_DOUBLE
1719           /* Requires 16 byte alignment for malloc */
1720 #       define ALIGNMENT 8
1721 #       define OS_TYPE "LINUX"
1722         /* The following works on NUE and older kernels:        */
1723 /* #       define STACKBOTTOM ((ptr_t) 0xa000000000000000l)     */
1724         /* This does not work on NUE:                           */
1725 #       define LINUX_STACKBOTTOM
1726         /* We also need the base address of the register stack  */
1727         /* backing store.  This is computed in                  */
1728         /* GC_linux_register_stack_base based on the following  */
1729         /* constants:                                           */
1730 #       define BACKING_STORE_ALIGNMENT 0x100000
1731 #       define BACKING_STORE_DISPLACEMENT 0x80000000
1732         extern ptr_t GC_register_stackbottom;
1733 #       define BACKING_STORE_BASE GC_register_stackbottom
1734 #       define SEARCH_FOR_DATA_START
1735 #       ifdef __GNUC__
1736 #         define DYNAMIC_LOADING
1737 #       else
1738           /* In the Intel compiler environment, we seem to end up with  */
1739           /* statically linked executables and an undefined reference   */
1740           /* to _DYNAMIC                                                */
1741 #       endif
1742 #       define MPROTECT_VDB
1743                 /* Requires Linux 2.3.47 or later.      */
1744         extern int _end[];
1745 #       define DATAEND (_end)
1746 #       ifdef __GNUC__
1747 #         ifndef __INTEL_COMPILER
1748 #           define PREFETCH(x) \
1749               __asm__ ("        lfetch  [%0]": : "r"(x))
1750 #           define PREFETCH_FOR_WRITE(x) \
1751               __asm__ ("        lfetch.excl     [%0]": : "r"(x))
1752 #           define CLEAR_DOUBLE(x) \
1753               __asm__ ("        stf.spill       [%0]=f0": : "r"((void *)(x)))
1754 #         else
1755 #           include <ia64intrin.h>
1756 #           define PREFETCH(x) \
1757               __lfetch(__lfhint_none, (x))
1758 #           define PREFETCH_FOR_WRITE(x) \
1759               __lfetch(__lfhint_nta,  (x))
1760 #           define CLEAR_DOUBLE(x) \
1761               __stf_spill((void *)(x), 0)
1762 #         endif // __INTEL_COMPILER
1763 #       endif
1764 #   endif
1765 #   ifdef MSWIN32
1766       /* FIXME: This is a very partial guess.  There is no port, yet.   */
1767 #     define OS_TYPE "MSWIN32"
1768                 /* STACKBOTTOM and DATASTART are handled specially in   */
1769                 /* os_dep.c.                                            */
1770 #     define DATAEND  /* not needed */
1771 #     if defined(_WIN64)
1772 #       define CPP_WORDSZ 64
1773 #     else
1774 #       define CPP_WORDSZ 32   /* Is this possible?     */
1775 #     endif
1776 #     define ALIGNMENT 8
1777 #   endif
1778 # endif
1779
1780 # ifdef M88K
1781 #   define MACH_TYPE "M88K"
1782 #   define ALIGNMENT 4
1783 #   define ALIGN_DOUBLE
1784     extern int etext[];
1785 #   ifdef CX_UX
1786 #       define OS_TYPE "CX_UX"
1787 #       define DATASTART ((((word)etext + 0x3fffff) & ~0x3fffff) + 0x10000)
1788 #   endif
1789 #   ifdef  DGUX
1790 #       define OS_TYPE "DGUX"
1791         extern ptr_t GC_SysVGetDataStart();
1792 #       define DATASTART GC_SysVGetDataStart(0x10000, etext)
1793 #   endif
1794 #   define STACKBOTTOM ((char*)0xf0000000) /* determined empirically */
1795 # endif
1796
1797 # ifdef S370
1798     /* If this still works, and if anyone cares, this should probably   */
1799     /* be moved to the S390 category.                                   */
1800 #   define MACH_TYPE "S370"
1801 #   define ALIGNMENT 4  /* Required by hardware */
1802 #   define USE_GENERIC_PUSH_REGS
1803 #   ifdef UTS4
1804 #       define OS_TYPE "UTS4"
1805         extern int etext[];
1806         extern int _etext[];
1807         extern int _end[];
1808         extern ptr_t GC_SysVGetDataStart();
1809 #       define DATASTART GC_SysVGetDataStart(0x10000, _etext)
1810 #       define DATAEND (_end)
1811 #       define HEURISTIC2
1812 #   endif
1813 # endif
1814
1815 # ifdef S390
1816 #   define MACH_TYPE "S390"
1817 #   define USE_GENERIC_PUSH_REGS
1818 #   ifndef __s390x__
1819 #     define ALIGNMENT 4
1820 #     define CPP_WORDSZ 32
1821 #   else
1822 #     define ALIGNMENT 8
1823 #     define CPP_WORDSZ 64
1824 #   endif
1825 #   ifndef HBLKSIZE
1826 #     define HBLKSIZE 4096
1827 #   endif
1828 #   ifdef LINUX
1829 #       define OS_TYPE "LINUX"
1830 #       define LINUX_STACKBOTTOM
1831 #       define DYNAMIC_LOADING
1832         extern int __data_start[];
1833 #       define DATASTART ((ptr_t)(__data_start))
1834     extern int _end[];
1835 #   define DATAEND (_end)
1836 #   define CACHE_LINE_SIZE 256
1837 #   define GETPAGESIZE() 4096
1838 #   endif
1839 # endif
1840
1841 # if defined(PJ)
1842 #   define ALIGNMENT 4
1843     extern int _etext[];
1844 #   define DATASTART ((ptr_t)(_etext))
1845 #   define HEURISTIC1
1846 # endif
1847
1848 # ifdef ARM32
1849 #   define CPP_WORDSZ 32
1850 #   define MACH_TYPE "ARM32"
1851 #   define ALIGNMENT 4
1852 #   ifdef NETBSD
1853 #       define OS_TYPE "NETBSD"
1854 #       define HEURISTIC2
1855 #       ifdef __ELF__
1856 #          define DATASTART GC_data_start
1857 #          define DYNAMIC_LOADING
1858 #       else
1859            extern char etext[];
1860 #          define DATASTART ((ptr_t)(etext))
1861 #       endif
1862 #       define USE_GENERIC_PUSH_REGS
1863 #   endif
1864 #   ifdef LINUX
1865 #       define OS_TYPE "LINUX"
1866 #       define LINUX_STACKBOTTOM
1867 #       undef STACK_GRAN
1868 #       define STACK_GRAN 0x10000000
1869 #       define USE_GENERIC_PUSH_REGS
1870 #       ifdef __ELF__
1871 #            define DYNAMIC_LOADING
1872 #            include <features.h>
1873 #            if defined(__GLIBC__) && __GLIBC__ >= 2
1874 #                define SEARCH_FOR_DATA_START
1875 #            else
1876                  extern char **__environ;
1877 #                define DATASTART ((ptr_t)(&__environ))
1878                               /* hideous kludge: __environ is the first */
1879                               /* word in crt0.o, and delimits the start */
1880                               /* of the data segment, no matter which   */
1881                               /* ld options were passed through.        */
1882                               /* We could use _etext instead, but that  */
1883                               /* would include .rodata, which may       */
1884                               /* contain large read-only data tables    */
1885                               /* that we'd rather not scan.             */
1886 #            endif
1887              extern int _end[];
1888 #            define DATAEND (_end)
1889 #       else
1890              extern int etext[];
1891 #            define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1892 #       endif
1893 #   endif
1894 #   ifdef MSWINCE
1895 #     define OS_TYPE "MSWINCE"
1896 #     define DATAEND /* not needed */
1897 #   endif
1898 #   ifdef NOSYS
1899       /* __data_start is usually defined in the target linker script.  */
1900       extern int __data_start[];
1901 #     define DATASTART (ptr_t)(__data_start)
1902 #     define USE_GENERIC_PUSH_REGS
1903       /* __stack_base__ is set in newlib/libc/sys/arm/crt0.S  */
1904       extern void *__stack_base__;
1905 #     define STACKBOTTOM ((ptr_t) (__stack_base__))
1906 #   endif
1907 #endif
1908
1909 # ifdef CRIS
1910 #   define MACH_TYPE "CRIS"
1911 #   define CPP_WORDSZ 32
1912 #   define ALIGNMENT 1
1913 #   define OS_TYPE "LINUX"
1914 #   define DYNAMIC_LOADING
1915 #   define LINUX_STACKBOTTOM
1916 #   define USE_GENERIC_PUSH_REGS
1917 #   define SEARCH_FOR_DATA_START
1918       extern int _end[];
1919 #   define DATAEND (_end)
1920 # endif
1921
1922 # ifdef SH
1923 #   define MACH_TYPE "SH"
1924 #   define ALIGNMENT 4
1925 #   ifdef MSWINCE
1926 #     define OS_TYPE "MSWINCE"
1927 #     define DATAEND /* not needed */
1928 #   endif
1929 #   ifdef LINUX
1930 #     define OS_TYPE "LINUX"
1931 #     define LINUX_STACKBOTTOM
1932 #     define USE_GENERIC_PUSH_REGS
1933 #     define DYNAMIC_LOADING
1934 #     define SEARCH_FOR_DATA_START
1935       extern int _end[];
1936 #     define DATAEND (_end)
1937 #   endif
1938 #   ifdef NETBSD
1939 #      define OS_TYPE "NETBSD"
1940 #      define HEURISTIC2
1941 #      define DATASTART GC_data_start
1942 #       define USE_GENERIC_PUSH_REGS
1943 #      define DYNAMIC_LOADING
1944 #   endif
1945 # endif
1946  
1947 # ifdef SH4
1948 #   define MACH_TYPE "SH4"
1949 #   define OS_TYPE "MSWINCE"
1950 #   define ALIGNMENT 4
1951 #   define DATAEND /* not needed */
1952 # endif
1953
1954 # ifdef M32R
1955 #   define CPP_WORDSZ 32
1956 #   define MACH_TYPE "M32R"
1957 #   define ALIGNMENT 4
1958 #   ifdef LINUX
1959 #     define OS_TYPE "LINUX"
1960 #     define LINUX_STACKBOTTOM
1961 #     undef STACK_GRAN
1962 #     define STACK_GRAN 0x10000000
1963 #     define USE_GENERIC_PUSH_REGS
1964 #     define DYNAMIC_LOADING
1965 #     define SEARCH_FOR_DATA_START
1966       extern int _end[];
1967 #     define DATAEND (_end)
1968 #   endif
1969 # endif
1970
1971 # ifdef X86_64
1972 #   define MACH_TYPE "X86_64"
1973 #   define ALIGNMENT 8
1974 #   define CPP_WORDSZ 64
1975 #   ifndef HBLKSIZE
1976 #     define HBLKSIZE 4096
1977 #   endif
1978 #   define CACHE_LINE_SIZE 64
1979 #   define USE_GENERIC_PUSH_REGS
1980 #   ifdef LINUX
1981 #       define OS_TYPE "LINUX"
1982 #       define LINUX_STACKBOTTOM
1983 #       if !defined(GC_LINUX_THREADS) || !defined(REDIRECT_MALLOC)
1984 #           define MPROTECT_VDB
1985 #       else
1986             /* We seem to get random errors in incremental mode,        */
1987             /* possibly because Linux threads is itself a malloc client */
1988             /* and can't deal with the signals.                         */
1989 #       endif
1990 #       ifdef __ELF__
1991 #            define DYNAMIC_LOADING
1992 #            ifdef UNDEFINED    /* includes ro data */
1993                extern int _etext[];
1994 #              define DATASTART ((ptr_t)((((word) (_etext)) + 0xfff) & ~0xfff))
1995 #            endif
1996 #            include <features.h>
1997 #            define SEARCH_FOR_DATA_START
1998              extern int _end[];
1999 #            define DATAEND (_end)
2000 #       else
2001              extern int etext[];
2002 #            define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
2003 #       endif
2004 #       if defined(__GNUC__) && __GNUC >= 3
2005 #           define PREFETCH(x) __builtin_prefetch((x), 0, 0)
2006 #           define PREFETCH_FOR_WRITE(x) __builtin_prefetch((x), 1)
2007 #       endif
2008 #   endif
2009 #   ifdef DARWIN
2010 #     define OS_TYPE "DARWIN"
2011 #     define DARWIN_DONT_PARSE_STACK
2012 #     define DYNAMIC_LOADING
2013       /* XXX: see get_end(3), get_etext() and get_end() should not be used.
2014          These aren't used when dyld support is enabled (it is by default) */
2015 #     define DATASTART ((ptr_t) get_etext())
2016 #     define DATAEND    ((ptr_t) get_end())
2017 #     define STACKBOTTOM ((ptr_t) 0x7fff5fc00000)
2018 #     define USE_MMAP
2019 #     define USE_MMAP_ANON
2020 #     ifdef GC_DARWIN_THREADS
2021 #       define MPROTECT_VDB
2022 #     endif
2023 #     include <unistd.h>
2024 #     define GETPAGESIZE() getpagesize()
2025       /* There seems to be some issues with trylock hanging on darwin. This
2026          should be looked into some more */
2027 #     define NO_PTHREAD_TRYLOCK
2028 #   endif
2029 #   ifdef FREEBSD
2030 #       define OS_TYPE "FREEBSD"
2031 #       ifndef GC_FREEBSD_THREADS
2032 #           define MPROTECT_VDB
2033 #       endif
2034 #       ifdef __GLIBC__
2035 #           define SIG_SUSPEND          (32+6)
2036 #           define SIG_THR_RESTART      (32+5)
2037             extern int _end[];
2038 #           define DATAEND (_end)
2039 #       else
2040 #           define SIG_SUSPEND SIGUSR1
2041 #           define SIG_THR_RESTART SIGUSR2
2042 #       endif
2043 #       define FREEBSD_STACKBOTTOM
2044 #       ifdef __ELF__
2045 #           define DYNAMIC_LOADING
2046 #       endif
2047         extern char etext[];
2048         extern char * GC_FreeBSDGetDataStart();
2049 #       define DATASTART GC_FreeBSDGetDataStart(0x1000, &etext)
2050 #   endif
2051 #   ifdef NETBSD
2052 #       define OS_TYPE "NETBSD"
2053 #       ifdef __ELF__
2054 #           define DYNAMIC_LOADING
2055 #       endif
2056 #       define HEURISTIC2
2057         extern char etext[];
2058 #       define SEARCH_FOR_DATA_START
2059 #   endif
2060 #   ifdef SUNOS5
2061 #       define ELF_CLASS ELFCLASS64
2062 #       define OS_TYPE "SUNOS5"
2063         extern int _etext[], _end[];
2064         extern ptr_t GC_SysVGetDataStart();
2065 #       define DATASTART GC_SysVGetDataStart(0x1000, _etext)
2066 #       define DATAEND (_end)
2067 /*      # define STACKBOTTOM ((ptr_t)(_start)) worked through 2.7,      */
2068 /*      but reportedly breaks under 2.8.  It appears that the stack     */
2069 /*      base is a property of the executable, so this should not break  */
2070 /*      old executables.                                                */
2071 /*      HEURISTIC2 probably works, but this appears to be preferable.   */
2072 /* #       include <sys/vm.h> */
2073 /* #    define STACKBOTTOM USRSTACK */
2074 #       define HEURISTIC2
2075 #       define PROC_VDB
2076 #       define DYNAMIC_LOADING
2077 #       if !defined(USE_MMAP) && defined(REDIRECT_MALLOC)
2078 #           define USE_MMAP
2079             /* Otherwise we now use calloc.  Mmap may result in the     */
2080             /* heap interleaved with thread stacks, which can result in */
2081             /* excessive blacklisting.  Sbrk is unusable since it       */
2082             /* doesn't interact correctly with the system malloc.       */
2083 #       endif
2084 #       ifdef USE_MMAP
2085 #         define HEAP_START (ptr_t)0x40000000
2086 #       else
2087 #         define HEAP_START DATAEND
2088 #       endif
2089 #   endif
2090 # endif
2091
2092 #if defined(LINUX) && defined(USE_MMAP)
2093     /* The kernel may do a somewhat better job merging mappings etc.    */
2094     /* with anonymous mappings.                                         */
2095 #   define USE_MMAP_ANON
2096 #endif
2097
2098 #if defined(LINUX) && defined(REDIRECT_MALLOC)
2099     /* Rld appears to allocate some memory with its own allocator, and  */
2100     /* some through malloc, which might be redirected.  To make this    */
2101     /* work with collectable memory, we have to scan memory allocated   */
2102     /* by rld's internal malloc.                                        */
2103 #   define USE_PROC_FOR_LIBRARIES
2104 #endif
2105     
2106 # ifndef STACK_GROWS_UP
2107 #   define STACK_GROWS_DOWN
2108 # endif
2109
2110 # ifndef CPP_WORDSZ
2111 #   define CPP_WORDSZ 32
2112 # endif
2113
2114 # ifndef OS_TYPE
2115 #   define OS_TYPE ""
2116 # endif
2117
2118 # ifndef DATAEND
2119     extern int end[];
2120 #   define DATAEND (end)
2121 # endif
2122
2123 # if defined(SVR4) && !defined(GETPAGESIZE)
2124 #    include <unistd.h>
2125 #    define GETPAGESIZE()  sysconf(_SC_PAGESIZE)
2126 # endif
2127
2128 # ifndef GETPAGESIZE
2129 #   if defined(SUNOS5) || defined(IRIX5)
2130 #       include <unistd.h>
2131 #   endif
2132 #   define GETPAGESIZE() getpagesize()
2133 # endif
2134
2135 # if defined(SUNOS5) || defined(DRSNX) || defined(UTS4)
2136             /* OS has SVR4 generic features.  Probably others also qualify.     */
2137 #   define SVR4
2138 # endif
2139
2140 # if defined(SUNOS5) || defined(DRSNX)
2141             /* OS has SUNOS5 style semi-undocumented interface to dynamic       */
2142             /* loader.                                                          */
2143 #   define SUNOS5DL
2144             /* OS has SUNOS5 style signal handlers.                             */
2145 #   define SUNOS5SIGS
2146 # endif
2147
2148 # if defined(HPUX)
2149 #   define SUNOS5SIGS
2150 # endif
2151
2152 # if defined(FREEBSD) && ((__FreeBSD__ >= 4) || (__FreeBSD_kernel__ >= 4))
2153 #   define SUNOS5SIGS
2154 # endif
2155
2156 # if defined(SVR4) || defined(LINUX) || defined(IRIX5) || defined(HPUX) \
2157             || defined(OPENBSD) || defined(NETBSD) || defined(FREEBSD) \
2158             || defined(DGUX) || defined(BSD) || defined(SUNOS4) \
2159             || defined(_AIX) || defined(DARWIN) || defined(OSF1)
2160 #   define UNIX_LIKE   /* Basic Unix-like system calls work.    */
2161 # endif
2162
2163 # if CPP_WORDSZ != 32 && CPP_WORDSZ != 64
2164            -> bad word size
2165 # endif
2166
2167 # ifdef PCR
2168 #   undef DYNAMIC_LOADING
2169 #   undef STACKBOTTOM
2170 #   undef HEURISTIC1
2171 #   undef HEURISTIC2
2172 #   undef PROC_VDB
2173 #   undef MPROTECT_VDB
2174 #   define PCR_VDB
2175 # endif
2176
2177 # ifdef SRC_M3
2178         /* Postponed for now. */
2179 #   undef PROC_VDB
2180 #   undef MPROTECT_VDB
2181 # endif
2182
2183 # ifdef SMALL_CONFIG
2184         /* Presumably not worth the space it takes. */
2185 #   undef PROC_VDB
2186 #   undef MPROTECT_VDB
2187 # endif
2188
2189 # ifdef USE_MUNMAP
2190 #   undef MPROTECT_VDB  /* Can't deal with address space holes. */
2191 # endif
2192
2193 # ifdef PARALLEL_MARK
2194 #   undef MPROTECT_VDB  /* For now.     */
2195 # endif
2196
2197 # if !defined(PCR_VDB) && !defined(PROC_VDB) && !defined(MPROTECT_VDB)
2198 #   define DEFAULT_VDB
2199 # endif
2200
2201 # ifndef PREFETCH
2202 #   define PREFETCH(x)
2203 #   define NO_PREFETCH
2204 # endif
2205
2206 # ifndef PREFETCH_FOR_WRITE
2207 #   define PREFETCH_FOR_WRITE(x)
2208 #   define NO_PREFETCH_FOR_WRITE
2209 # endif
2210
2211 # ifndef CACHE_LINE_SIZE
2212 #   define CACHE_LINE_SIZE 32   /* Wild guess   */
2213 # endif
2214
2215 # if defined(LINUX) || defined(__GLIBC__)
2216 #   define REGISTER_LIBRARIES_EARLY
2217     /* We sometimes use dl_iterate_phdr, which may acquire an internal  */
2218     /* lock.  This isn't safe after the world has stopped.  So we must  */
2219     /* call GC_register_dynamic_libraries before stopping the world.    */
2220     /* For performance reasons, this may be beneficial on other         */
2221     /* platforms as well, though it should be avoided in win32.         */
2222 # endif /* LINUX */
2223
2224 # if defined(SEARCH_FOR_DATA_START)
2225     extern ptr_t GC_data_start;
2226 #   define DATASTART GC_data_start
2227 # endif
2228
2229 # ifndef CLEAR_DOUBLE
2230 #   define CLEAR_DOUBLE(x) \
2231                 ((word*)x)[0] = 0; \
2232                 ((word*)x)[1] = 0;
2233 # endif /* CLEAR_DOUBLE */
2234
2235 # if defined(GC_IRIX_THREADS) && !defined(IRIX5)
2236         --> inconsistent configuration
2237 # endif
2238 # if defined(GC_LINUX_THREADS) && !defined(LINUX)
2239         --> inconsistent configuration
2240 # endif
2241 # if defined(GC_SOLARIS_THREADS) && !defined(SUNOS5)
2242         --> inconsistent configuration
2243 # endif
2244 # if defined(GC_HPUX_THREADS) && !defined(HPUX)
2245         --> inconsistent configuration
2246 # endif
2247 # if defined(GC_AIX_THREADS) && !defined(_AIX)
2248         --> inconsistent configuration
2249 # endif
2250 # if defined(GC_WIN32_THREADS) && !defined(MSWIN32) && !defined(CYGWIN32)
2251         --> inconsistent configuration
2252 # endif
2253
2254 # if defined(PCR) || defined(SRC_M3) || \
2255                 defined(GC_SOLARIS_THREADS) || defined(GC_WIN32_THREADS) || \
2256                 defined(GC_PTHREADS)
2257 #   define THREADS
2258 # endif
2259
2260 # if defined(HP_PA) || defined(M88K) \
2261              || defined(POWERPC) && !defined(DARWIN) \
2262              || defined(LINT) || defined(MSWINCE) || defined(ARM32) || defined(CRIS) \
2263              || (defined(I386) && defined(__LCC__))
2264         /* Use setjmp based hack to mark from callee-save registers.    */
2265         /* The define should move to the individual platform            */
2266         /* descriptions.                                                */
2267 #       define USE_GENERIC_PUSH_REGS
2268 # endif
2269
2270 # if defined(MSWINCE)
2271 #   define NO_GETENV
2272 # endif
2273
2274 # if defined(SPARC)
2275 #   define ASM_CLEAR_CODE       /* Stack clearing is crucial, and we    */
2276                                 /* include assembly code to do it well. */
2277 # endif
2278
2279   /* Can we save call chain in objects for debugging?                   */
2280   /* SET NFRAMES (# of saved frames) and NARGS (#of args for each       */
2281   /* frame) to reasonable values for the platform.                      */
2282   /* Set SAVE_CALL_CHAIN if we can.  SAVE_CALL_COUNT can be specified   */
2283   /* at build time, though we feel free to adjust it slightly.          */
2284   /* Define NEED_CALLINFO if we either save the call stack or           */
2285   /* GC_ADD_CALLER is defined.                                          */
2286   /* GC_CAN_SAVE_CALL_STACKS is set in gc.h.                            */
2287
2288 #if defined(SPARC)
2289 # define CAN_SAVE_CALL_ARGS
2290 #endif
2291 #if (defined(I386) || defined(X86_64)) && (defined(LINUX) || defined(__GLIBC__))
2292             /* SAVE_CALL_CHAIN is supported if the code is compiled to save     */
2293             /* frame pointers by default, i.e. no -fomit-frame-pointer flag.    */
2294 # define CAN_SAVE_CALL_ARGS
2295 #endif
2296
2297 # if defined(SAVE_CALL_COUNT) && !defined(GC_ADD_CALLER) \
2298              && defined(GC_CAN_SAVE_CALL_STACKS)
2299 #   define SAVE_CALL_CHAIN 
2300 # endif
2301 # ifdef SAVE_CALL_CHAIN
2302 #   if defined(SAVE_CALL_NARGS) && defined(CAN_SAVE_CALL_ARGS)
2303 #     define NARGS SAVE_CALL_NARGS
2304 #   else
2305 #     define NARGS 0    /* Number of arguments to save for each call.   */
2306 #   endif
2307 # endif
2308 # ifdef SAVE_CALL_CHAIN
2309 #   ifndef SAVE_CALL_COUNT
2310 #     define NFRAMES 6  /* Number of frames to save. Even for           */
2311                                 /* alignment reasons.                           */
2312 #   else
2313 #     define NFRAMES ((SAVE_CALL_COUNT + 1) & ~1)
2314 #   endif
2315 #   define NEED_CALLINFO
2316 # endif /* SAVE_CALL_CHAIN */
2317 # ifdef GC_ADD_CALLER
2318 #   define NFRAMES 1
2319 #   define NARGS 0
2320 #   define NEED_CALLINFO
2321 # endif
2322
2323 # if defined(MAKE_BACK_GRAPH) && !defined(DBG_HDRS_ALL)
2324 #   define DBG_HDRS_ALL
2325 # endif
2326
2327 # if defined(POINTER_MASK) && !defined(POINTER_SHIFT)
2328 #   define POINTER_SHIFT 0
2329 # endif
2330
2331 # if defined(POINTER_SHIFT) && !defined(POINTER_MASK)
2332 #   define POINTER_MASK ((GC_word)(-1))
2333 # endif
2334
2335 # if !defined(FIXUP_POINTER) && defined(POINTER_MASK)
2336 #   define FIXUP_POINTER(p) (p) = ((p) & (POINTER_MASK) << POINTER_SHIFT)
2337 # endif
2338
2339 # if defined(FIXUP_POINTER)
2340 #   define NEED_FIXUP_POINTER 1
2341 # else
2342 #   define NEED_FIXUP_POINTER 0
2343 #   define FIXUP_POINTER(p)
2344 # endif
2345
2346 #ifdef GC_PRIVATE_H
2347         /* This relies on some type definitions from gc_priv.h, from    */
2348         /* where it's normally included.                                */
2349         /*                                                              */
2350         /* How to get heap memory from the OS:                          */
2351         /* Note that sbrk()-like allocation is preferred, since it      */
2352         /* usually makes it possible to merge consecutively allocated   */
2353         /* chunks.  It also avoids unintented recursion with            */
2354         /* -DREDIRECT_MALLOC.                                           */
2355         /* GET_MEM() returns a HLKSIZE aligned chunk.                   */
2356         /* 0 is taken to mean failure.                                  */
2357         /* In the case os USE_MMAP, the argument must also be a         */
2358         /* physical page size.                                          */
2359         /* GET_MEM is currently not assumed to retrieve 0 filled space, */
2360         /* though we should perhaps take advantage of the case in which */
2361         /* does.                                                        */
2362         struct hblk;    /* See gc_priv.h.       */
2363 # ifdef PCR
2364             char * real_malloc();
2365 #   define GET_MEM(bytes) HBLKPTR(real_malloc((size_t)bytes + GC_page_size) \
2366                                           + GC_page_size-1)
2367 # else
2368 #   ifdef OS2
2369               void * os2_alloc(size_t bytes);
2370 #     define GET_MEM(bytes) HBLKPTR((ptr_t)os2_alloc((size_t)bytes \
2371                                             + GC_page_size) \
2372                                             + GC_page_size-1)
2373 #   else
2374 #     if defined(NEXT) || defined(DOS4GW) || \
2375                  (defined(AMIGA) && !defined(GC_AMIGA_FASTALLOC)) || \
2376                  (defined(SUNOS5) && !defined(USE_MMAP))
2377 #       define GET_MEM(bytes) HBLKPTR((size_t) \
2378                                               calloc(1, (size_t)bytes + GC_page_size) \
2379                                               + GC_page_size-1)
2380 #     else
2381 #       if defined(MSWIN32) || defined(CYGWIN32)
2382           extern ptr_t GC_win32_get_mem();
2383 #         define GET_MEM(bytes) (struct hblk *)GC_win32_get_mem(bytes)
2384 #       else
2385 #         ifdef MACOS
2386 #           if defined(USE_TEMPORARY_MEMORY)
2387                         extern Ptr GC_MacTemporaryNewPtr(size_t size,
2388                                                          Boolean clearMemory);
2389 #               define GET_MEM(bytes) HBLKPTR( \
2390                             GC_MacTemporaryNewPtr(bytes + GC_page_size, true) \
2391                             + GC_page_size-1)
2392 #           else
2393 #                   define GET_MEM(bytes) HBLKPTR( \
2394                                 NewPtrClear(bytes + GC_page_size) + GC_page_size-1)
2395 #           endif
2396 #         else
2397 #           ifdef MSWINCE
2398               extern ptr_t GC_wince_get_mem();
2399 #             define GET_MEM(bytes) (struct hblk *)GC_wince_get_mem(bytes)
2400 #           else
2401 #             if defined(AMIGA) && defined(GC_AMIGA_FASTALLOC)
2402                         extern void *GC_amiga_get_mem(size_t size);
2403 #               define GET_MEM(bytes) HBLKPTR((size_t) \
2404                           GC_amiga_get_mem((size_t)bytes + GC_page_size) \
2405                           + GC_page_size-1)
2406 #             else
2407                 extern ptr_t GC_unix_get_mem();
2408 #               define GET_MEM(bytes) (struct hblk *)GC_unix_get_mem(bytes)
2409 #             endif
2410 #           endif
2411 #         endif
2412 #       endif
2413 #     endif
2414 #   endif
2415 # endif
2416
2417 #endif /* GC_PRIVATE_H */
2418
2419 #if defined(_AIX) && !defined(__GNUC__) && !defined(__STDC__)
2420   /* IBMs xlc compiler doesn't appear to follow the convention of       */
2421   /* defining  __STDC__ to be zero in extended mode.                    */
2422 #   define __STDC__ 0
2423 #endif
2424
2425 # endif /* GCCONFIG_H */