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.
7 * THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED
8 * OR IMPLIED. ANY USE IS AT YOUR OWN RISK.
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.
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
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 # include <stddef.h> /* For size_t etc. */
36 /* Machine dependent parameters. Some tuning parameters can be found */
37 /* near the top of gc_private.h. */
39 /* Machine specific parts contributed by various people. See README file. */
41 /* First a unified test for Linux: */
42 # if defined(linux) || defined(__linux__)
48 /* And one for NetBSD: */
49 # if defined(__NetBSD__)
53 /* And one for OpenBSD: */
54 # if defined(__OpenBSD__)
58 /* And one for FreeBSD: */
59 # if (defined(__FreeBSD__) || defined(__DragonFly__) || \
60 defined(__FreeBSD_kernel__)) && !defined(FREEBSD)
64 /* Determine the machine type: */
65 # if defined(__arm__) || defined(__thumb__)
67 # if !defined(LINUX) && !defined(NETBSD)
69 # define mach_type_known
72 # if defined(sun) && defined(mc68000)
73 # error SUNOS4 no longer supported
75 # if defined(hp9000s300)
76 # error M68K based HP machines no longer supported.
78 # if defined(OPENBSD) && defined(m68k)
80 # define mach_type_known
82 # if defined(OPENBSD) && defined(__sparc__)
84 # define mach_type_known
86 # if defined(NETBSD) && (defined(m68k) || defined(__m68k__))
88 # define mach_type_known
90 # if defined(NETBSD) && defined(__powerpc__)
92 # define mach_type_known
94 # if defined(NETBSD) && (defined(__arm32__) || defined(__arm__))
96 # define mach_type_known
98 # if defined(NETBSD) && defined(__sh__)
100 # define mach_type_known
109 # define mach_type_known
111 # if defined(__NetBSD__) && defined(__vax__)
113 # define mach_type_known
115 # if defined(mips) || defined(__mips) || defined(_mips)
117 # if defined(nec_ews) || defined(_nec_ews)
120 # if !defined(LINUX) && !defined(EWS4800) && !defined(NETBSD)
121 # if defined(ultrix) || defined(__ultrix)
124 # define IRIX5 /* or IRIX 6.X */
127 # if defined(__NetBSD__) && defined(__MIPSEL__)
130 # define mach_type_known
132 # if defined(DGUX) && (defined(i386) || defined(__i386__))
137 # define mach_type_known
139 # if defined(sequent) && (defined(i386) || defined(__i386__))
142 # define mach_type_known
144 # if defined(sun) && (defined(i386) || defined(__i386__))
147 # define mach_type_known
149 # if defined(sun) && defined(__amd64)
152 # define mach_type_known
154 # if (defined(__OS2__) || defined(__EMX__)) && defined(__32BIT__)
157 # define mach_type_known
160 # error IBM PC/RT no longer supported.
162 # if defined(sun) && (defined(sparc) || defined(__sparc))
164 /* Test for SunOS 5.x */
167 # define mach_type_known
169 # if defined(sparc) && defined(unix) && !defined(sun) && !defined(linux) \
170 && !defined(__OpenBSD__) && !defined(__NetBSD__) && !defined(__FreeBSD__) \
171 && !defined(__DragonFly__)
174 # define mach_type_known
179 # define mach_type_known
181 # if defined(__NetBSD__) && defined(__sparc__)
183 # define mach_type_known
185 # if defined(_M_XENIX) && defined(_M_SYSV) && defined(_M_I386)
186 /* The above test may need refinement */
188 # if defined(_SCO_ELF)
193 # define mach_type_known
195 # if defined(_AUX_SOURCE)
196 # error A/UX no longer supported
198 # if defined(_PA_RISC1_0) || defined(_PA_RISC1_1) || defined(_PA_RISC2_0) \
199 || defined(hppa) || defined(__hppa__)
201 # if !defined(LINUX) && !defined(HPUX)
204 # define mach_type_known
206 # if defined(__ia64) && defined(_HPUX_SOURCE)
211 # define mach_type_known
213 # if defined(__BEOS__) && defined(_X86_)
216 # define mach_type_known
218 # if defined(LINUX) && (defined(i386) || defined(__i386__))
220 # define mach_type_known
222 # if defined(LINUX) && defined(__x86_64__)
224 # define mach_type_known
226 # if defined(LINUX) && (defined(__ia64__) || defined(__ia64))
228 # define mach_type_known
230 # if defined(LINUX) && defined(__arm__)
232 # define mach_type_known
234 # if defined(LINUX) && defined(__cris__)
238 # define mach_type_known
240 # if defined(LINUX) && (defined(powerpc) || defined(__powerpc__) || \
241 defined(powerpc64) || defined(__powerpc64__))
243 # define mach_type_known
245 # if defined(FREEBSD) && (defined(powerpc) || defined(__powerpc__))
247 # define mach_type_known
249 # if defined(LINUX) && defined(__mc68000__)
251 # define mach_type_known
253 # if defined(LINUX) && (defined(sparc) || defined(__sparc__))
255 # define mach_type_known
257 # if defined(LINUX) && defined(__arm__)
259 # define mach_type_known
261 # if defined(LINUX) && defined(__sh__)
263 # define mach_type_known
265 # if defined(LINUX) && defined(__m32r__)
267 # define mach_type_known
269 # if defined(__alpha) || defined(__alpha__)
271 # if !defined(LINUX) && !defined(NETBSD) && !defined(OPENBSD) && !defined(FREEBSD)
272 # define OSF1 /* a.k.a Digital Unix */
274 # define mach_type_known
276 # if defined(_AMIGA) && !defined(AMIGA)
281 # define mach_type_known
283 # if defined(THINK_C) || defined(__MWERKS__) && !defined(__powerc)
286 # define mach_type_known
288 # if defined(__MWERKS__) && defined(__powerc) && !defined(__MACH__)
291 # define mach_type_known
293 # if defined(macosx) || (defined(__APPLE__) && defined(__MACH__))
295 # if defined(__ppc__) || defined(__ppc64__)
297 # define mach_type_known
298 # elif defined(__x86_64__)
300 # define mach_type_known
301 # elif defined(__i386__)
303 # define mach_type_known
306 # if defined(NeXT) && defined(mc68000)
309 # define mach_type_known
311 # if defined(NeXT) && (defined(i386) || defined(__i386__))
314 # define mach_type_known
316 # if defined(__OpenBSD__) && (defined(i386) || defined(__i386__))
319 # define mach_type_known
321 # if defined(FREEBSD) && (defined(i386) || defined(__i386__))
323 # define mach_type_known
325 # if defined(FREEBSD) && defined(__x86_64__)
327 # define mach_type_known
329 # if defined(__NetBSD__) && (defined(i386) || defined(__i386__))
331 # define mach_type_known
333 # if defined(__NetBSD__) && defined(__x86_64__)
335 # define mach_type_known
337 # if defined(FREEBSD) && defined(__sparc__)
339 # define mach_type_known
341 # if defined(bsdi) && (defined(i386) || defined(__i386__))
344 # define mach_type_known
346 # if !defined(mach_type_known) && defined(__386BSD__)
349 # define mach_type_known
351 # if defined(_CX_UX) && defined(_M88K)
354 # define mach_type_known
356 # if defined(DGUX) && defined(m88k)
359 # define mach_type_known
361 # if defined(_WIN32_WCE)
362 /* SH3, SH4, MIPS already defined for corresponding architectures */
363 # if defined(SH3) || defined(SH4)
373 # define mach_type_known
375 # if (defined(_MSDOS) || defined(_MSC_VER)) && (_M_IX86 >= 300) \
376 || defined(_WIN32) && !defined(__CYGWIN32__) && !defined(__CYGWIN__)
377 # if defined(__LP64__) || defined(_WIN64)
382 # define MSWIN32 /* or Win64 */
383 # define mach_type_known
385 # if defined(_MSC_VER) && defined(_M_IA64)
387 # define MSWIN32 /* Really win64, but we don't treat 64-bit */
388 /* variants as a differnt platform. */
391 # if defined(__DJGPP__)
394 # define DJGPP /* MSDOS running the DJGPP port of GCC */
396 # define mach_type_known
398 # if defined(__CYGWIN32__) || defined(__CYGWIN__)
401 # define mach_type_known
403 # if defined(__MINGW32__)
406 # define mach_type_known
408 # if defined(__BORLANDC__)
411 # define mach_type_known
413 # if defined(_UTS) && !defined(mach_type_known)
416 # define mach_type_known
419 # error PicoJava no longer supported
420 /* The implementation had problems, and I haven't heard of users */
421 /* in ages. If you want it resurrected, let me know. */
423 # if defined(__embedded__) && defined(PPC)
426 # define mach_type_known
429 # if defined(__WATCOMC__) && defined(__386__)
431 # if !defined(OS2) && !defined(MSWIN32) && !defined(DOS4GW)
432 # if defined(__OS2__)
435 # if defined(__WINDOWS_386__) || defined(__NT__)
442 # define mach_type_known
444 # if defined(__s390__) && defined(LINUX)
446 # define mach_type_known
448 # if defined(__GNU__)
449 # if defined(__i386__)
450 /* The Debian Hurd running on generic PC */
453 # define mach_type_known
456 # if defined(__TANDEM)
457 /* Nonstop S-series */
458 /* FIXME: Should recognize Integrity series? */
461 # define mach_type_known
464 /* Feel free to add more clauses here */
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 /* Macros such as LINUX, FREEBSD, etc. distinguish them. */
470 /* SYSV on an M68K actually means A/UX. */
471 /* The distinction in these cases is usually the stack starting address */
472 # ifndef mach_type_known
473 # error "The collector has not been ported to this machine/OS combination."
475 /* Mapping is: M68K ==> Motorola 680X0 */
476 /* (NEXT, and SYSV (A/UX), */
477 /* MACOS and AMIGA variants) */
478 /* I386 ==> Intel 386 */
479 /* (SEQUENT, OS2, SCO, LINUX, NETBSD, */
480 /* FREEBSD, THREE86BSD, MSWIN32, */
481 /* BSDI,SOLARIS, NEXT, other variants) */
482 /* NS32K ==> Encore Multimax */
483 /* MIPS ==> R2000 through R14K */
484 /* (many variants) */
485 /* VAX ==> DEC VAX */
486 /* (BSD, ULTRIX variants) */
487 /* HP_PA ==> HP9000/700 & /800 */
489 /* SPARC ==> SPARC v7/v8/v9 */
490 /* (SOLARIS, LINUX, DRSNX variants) */
491 /* ALPHA ==> DEC Alpha */
492 /* (OSF1 and LINUX variants) */
493 /* M88K ==> Motorola 88XX0 */
494 /* (CX_UX and DGUX) */
495 /* S370 ==> 370-like machine */
496 /* running Amdahl UTS4 */
497 /* S390 ==> 390-like machine */
499 /* ARM32 ==> Intel StrongARM */
500 /* IA64 ==> Intel IPF */
502 /* (LINUX and HPUX) */
503 /* SH ==> Hitachi SuperH */
504 /* (LINUX & MSWINCE) */
505 /* X86_64 ==> AMD x86-64 */
506 /* POWERPC ==> IBM/Apple PowerPC */
507 /* (MACOS(<=9),DARWIN(incl.MACOSX),*/
508 /* LINUX, NETBSD, AIX, NOSYS */
510 /* Handles 32 and 64-bit variants. */
511 /* CRIS ==> Axis Etrax */
512 /* M32R ==> Renesas M32R */
516 * For each architecture and OS, the following need to be defined:
518 * CPP_WORDSZ is a simple integer constant representing the word size.
519 * in bits. We assume byte addressibility, where a byte has 8 bits.
520 * We also assume CPP_WORDSZ is either 32 or 64.
521 * (We care about the length of pointers, not hardware
522 * bus widths. Thus a 64 bit processor with a C compiler that uses
523 * 32 bit pointers should use CPP_WORDSZ of 32, not 64. Default is 32.)
525 * MACH_TYPE is a string representation of the machine type.
526 * OS_TYPE is analogous for the OS.
528 * ALIGNMENT is the largest N, such that
529 * all pointer are guaranteed to be aligned on N byte boundaries.
530 * defining it to be 1 will always work, but perform poorly.
532 * DATASTART is the beginning of the data segment.
533 * On some platforms SEARCH_FOR_DATA_START is defined.
534 * SEARCH_FOR_DATASTART will cause GC_data_start to
535 * be set to an address determined by accessing data backwards from _end
536 * until an unmapped page is found. DATASTART will be defined to be
538 * On UNIX-like systems, the collector will scan the area between DATASTART
539 * and DATAEND for root pointers.
541 * DATAEND, if not `end' where `end' is defined as ``extern int end[];''.
542 * RTH suggests gaining access to linker script synth'd values with
543 * this idiom instead of `&end' where `end' is defined as ``extern int end;'' .
544 * Otherwise, ``GCC will assume these are in .sdata/.sbss'' and it will, e.g.,
545 * cause failures on alpha*-*-* with ``-msmall-data or -fpic'' or mips-*-*
546 * without any special options.
548 * STACKBOTTOM is the cool end of the stack, which is usually the
549 * highest address in the stack.
550 * Under PCR or OS/2, we have other ways of finding thread stacks.
551 * For each machine, the following should:
552 * 1) define STACK_GROWS_UP if the stack grows toward higher addresses, and
553 * 2) define exactly one of
554 * STACKBOTTOM (should be defined to be an expression)
558 * If STACKBOTTOM is defined, then it's value will be used directly as the
559 * stack base. If LINUX_STACKBOTTOM is defined, then it will be determined
560 * with a method appropriate for most Linux systems. Currently we look
561 * first for __libc_stack_end, and if that fails read it from /proc.
562 * If either of the last two macros are defined, then STACKBOTTOM is computed
563 * during collector startup using one of the following two heuristics:
564 * HEURISTIC1: Take an address inside GC_init's frame, and round it up to
565 * the next multiple of STACK_GRAN.
566 * HEURISTIC2: Take an address inside GC_init's frame, increment it repeatedly
567 * in small steps (decrement if STACK_GROWS_UP), and read the value
568 * at each location. Remember the value when the first
569 * Segmentation violation or Bus error is signalled. Round that
570 * to the nearest plausible page boundary, and use that instead
573 * Gustavo Rodriguez-Rivera points out that on most (all?) Unix machines,
574 * the value of environ is a pointer that can serve as STACKBOTTOM.
575 * I expect that HEURISTIC2 can be replaced by this approach, which
576 * interferes far less with debugging. However it has the disadvantage
577 * that it's confused by a putenv call before the collector is initialized.
578 * This could be dealt with by intercepting putenv ...
580 * If no expression for STACKBOTTOM can be found, and neither of the above
581 * heuristics are usable, the collector can still be used with all of the above
582 * undefined, provided one of the following is done:
583 * 1) GC_mark_roots can be changed to somehow mark from the correct stack(s)
584 * without reference to STACKBOTTOM. This is appropriate for use in
585 * conjunction with thread packages, since there will be multiple stacks.
586 * (Allocating thread stacks in the heap, and treating them as ordinary
587 * heap data objects is also possible as a last resort. However, this is
588 * likely to introduce significant amounts of excess storage retention
589 * unless the dead parts of the thread stacks are periodically cleared.)
590 * 2) Client code may set GC_stackbottom before calling any GC_ routines.
591 * If the author of the client code controls the main program, this is
592 * easily accomplished by introducing a new main program, setting
593 * GC_stackbottom to the address of a local variable, and then calling
594 * the original main program. The new main program would read something
597 * # include "gc_private.h"
599 * main(argc, argv, envp)
601 * char **argv, **envp;
605 * GC_stackbottom = (ptr_t)(&dummy);
606 * return(real_main(argc, argv, envp));
610 * Each architecture may also define the style of virtual dirty bit
611 * implementation to be used:
612 * MPROTECT_VDB: Write protect the heap and catch faults.
613 * GWW_VDB: Use win32 GetWriteWatch primitive.
614 * PROC_VDB: Use the SVR4 /proc primitives to read dirty bits.
616 * The first and second one may be combined, in which case a runtime
617 * selection will be made, based on GetWriteWatch availability.
619 * An architecture may define DYNAMIC_LOADING if dynamic_load.c
620 * defined GC_register_dynamic_libraries() for the architecture.
622 * An architecture may define PREFETCH(x) to preload the cache with *x.
623 * This defaults to a no-op.
625 * PREFETCH_FOR_WRITE(x) is used if *x is about to be written.
627 * An architecture may also define CLEAR_DOUBLE(x) to be a fast way to
628 * clear the two words at GC_malloc-aligned address x. By default,
629 * word stores of 0 are used instead.
631 * HEAP_START may be defined as the initial address hint for mmap-based
635 /* If we are using a recent version of gcc, we can use __builtin_unwind_init()
636 * to push the relevant registers onto the stack.
638 # if defined(__GNUC__) && ((__GNUC__ >= 3) || \
639 (__GNUC__ == 2 && __GNUC_MINOR__ >= 8)) \
640 && !defined(__INTEL_COMPILER) && !defined(__PATHCC__)
641 # define HAVE_BUILTIN_UNWIND_INIT
644 # define STACK_GRAN 0x1000000
646 # define MACH_TYPE "M68K"
649 # define OS_TYPE "OPENBSD"
652 # define DATASTART GC_data_start
653 # define DYNAMIC_LOADING
656 # define DATASTART ((ptr_t)(etext))
660 # define OS_TYPE "NETBSD"
663 # define DATASTART GC_data_start
664 # define DYNAMIC_LOADING
667 # define DATASTART ((ptr_t)(etext))
671 # define OS_TYPE "LINUX"
672 # define LINUX_STACKBOTTOM
673 # define MPROTECT_VDB
675 # define DYNAMIC_LOADING
676 # include <features.h>
677 # if defined(__GLIBC__)&& __GLIBC__>=2
678 # define SEARCH_FOR_DATA_START
680 extern char **__environ;
681 # define DATASTART ((ptr_t)(&__environ))
682 /* hideous kludge: __environ is the first */
683 /* word in crt0.o, and delimits the start */
684 /* of the data segment, no matter which */
685 /* ld options were passed through. */
686 /* We could use _etext instead, but that */
687 /* would include .rodata, which may */
688 /* contain large read-only data tables */
689 /* that we'd rather not scan. */
690 # endif /* !GLIBC2 */
692 # define DATAEND (_end)
695 # define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
699 # define OS_TYPE "AMIGA"
700 /* STACKBOTTOM and DATASTART handled specially */
702 # define DATAEND /* not needed */
703 # define GETPAGESIZE() 4096
709 # define OS_TYPE "MACOS"
710 /* see os_dep.c for details of global data segments. */
711 # define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
712 # define DATAEND /* not needed */
713 # define GETPAGESIZE() 4096
716 # define OS_TYPE "NEXT"
717 # define DATASTART ((ptr_t) get_etext())
718 # define STACKBOTTOM ((ptr_t) 0x4000000)
719 # define DATAEND /* not needed */
723 # if defined(POWERPC)
724 # define MACH_TYPE "POWERPC"
726 # define ALIGNMENT 2 /* Still necessary? Could it be 4? */
730 # define OS_TYPE "MACOS"
731 /* see os_dep.c for details of global data segments. */
732 # define STACKBOTTOM ((ptr_t) LMGetCurStackBase())
733 # define DATAEND /* not needed */
736 # if defined(__powerpc64__)
738 # define CPP_WORDSZ 64
740 # define HBLKSIZE 4096
745 # define OS_TYPE "LINUX"
746 /* HEURISTIC1 has been reliably reported to fail for a 32-bit */
747 /* executable on a 64 bit kernel. */
748 # define LINUX_STACKBOTTOM
749 # define DYNAMIC_LOADING
750 # define SEARCH_FOR_DATA_START
752 # define DATAEND (_end)
755 # define OS_TYPE "DARWIN"
756 # define DYNAMIC_LOADING
757 # if defined(__ppc64__)
759 # define CPP_WORDSZ 64
760 # define STACKBOTTOM ((ptr_t) 0x7fff5fc00000)
761 # define CACHE_LINE_SIZE 64
763 # define HBLKSIZE 4096
767 # define STACKBOTTOM ((ptr_t) 0xc0000000)
769 /* XXX: see get_end(3), get_etext() and get_end() should not be used.
770 These aren't used when dyld support is enabled (it is by default) */
771 # define DATASTART ((ptr_t) get_etext())
772 # define DATAEND ((ptr_t) get_end())
774 # define USE_MMAP_ANON
775 # ifdef GC_DARWIN_THREADS
776 # define MPROTECT_VDB
779 # define GETPAGESIZE() getpagesize()
780 # if defined(USE_PPC_PREFETCH) && defined(__GNUC__)
781 /* The performance impact of prefetches is untested */
782 # define PREFETCH(x) \
783 __asm__ __volatile__ ("dcbt 0,%0" : : "r" ((const void *) (x)))
784 # define PREFETCH_FOR_WRITE(x) \
785 __asm__ __volatile__ ("dcbtst 0,%0" : : "r" ((const void *) (x)))
787 /* There seems to be some issues with trylock hanging on darwin. This
788 should be looked into some more */
789 # define NO_PTHREAD_TRYLOCK
793 # define OS_TYPE "FREEBSD"
794 # ifndef GC_FREEBSD_THREADS
795 # define MPROTECT_VDB
797 # define SIG_SUSPEND SIGUSR1
798 # define SIG_THR_RESTART SIGUSR2
799 # define FREEBSD_STACKBOTTOM
801 # define DYNAMIC_LOADING
804 extern char * GC_FreeBSDGetDataStart();
805 # define DATASTART GC_FreeBSDGetDataStart(0x1000, &etext)
809 # define OS_TYPE "NETBSD"
812 # define DATASTART GC_data_start
813 # define DYNAMIC_LOADING
816 # define OS_TYPE "AIX"
817 # undef ALIGNMENT /* in case it's defined */
820 /* DOB: some AIX installs stupidly define IA64 in */
821 /* /usr/include/sys/systemcfg.h */
825 # define CPP_WORDSZ 64
826 # define STACKBOTTOM ((ptr_t)0x1000000000000000)
829 # define CPP_WORDSZ 32
830 # define STACKBOTTOM ((ptr_t)((ulong)&errno))
833 # define USE_MMAP_ANON
834 /* From AIX linker man page:
835 _text Specifies the first location of the program.
836 _etext Specifies the first location after the program.
837 _data Specifies the first location of the data.
838 _edata Specifies the first location after the initialized data
839 _end or end Specifies the first location after all data.
841 extern int _data[], _end[];
842 # define DATASTART ((ptr_t)((ulong)_data))
843 # define DATAEND ((ptr_t)((ulong)_end))
845 # define DYNAMIC_LOADING
846 /* For really old versions of AIX, this may have to be removed. */
851 # define OS_TYPE "NOSYS"
852 extern void __end[], __dso_handle[];
853 # define DATASTART (__dso_handle) /* OK, that's ugly. */
854 # define DATAEND (__end)
855 /* Stack starts at 0xE0000000 for the simulator. */
857 # define STACK_GRAN 0x10000000
863 # define MACH_TYPE "VAX"
864 # define ALIGNMENT 4 /* Pointers are longword aligned by 4.2 C compiler */
866 # define DATASTART ((ptr_t)(etext))
868 # define OS_TYPE "BSD"
870 /* HEURISTIC2 may be OK, but it's hard to test. */
873 # define OS_TYPE "ULTRIX"
874 # define STACKBOTTOM ((ptr_t) 0x7fffc800)
879 # define MACH_TYPE "SPARC"
880 # if defined(__arch64__) || defined(__sparcv9)
882 # define CPP_WORDSZ 64
883 # define ELF_CLASS ELFCLASS64
885 # define ALIGNMENT 4 /* Required by hardware */
886 # define CPP_WORDSZ 32
888 /* Don't define USE_ASM_PUSH_REGS. We do use an asm helper, but */
889 /* not to push the registers on the mark stack. */
891 # define OS_TYPE "SOLARIS"
894 extern ptr_t GC_SysVGetDataStart(size_t, ptr_t);
895 # define DATASTART GC_SysVGetDataStart(0x10000, (ptr_t)_etext)
896 # define DATAEND (_end)
897 # if !defined(USE_MMAP) && defined(REDIRECT_MALLOC)
899 /* Otherwise we now use calloc. Mmap may result in the */
900 /* heap interleaved with thread stacks, which can result in */
901 /* excessive blacklisting. Sbrk is unusable since it */
902 /* doesn't interact correctly with the system malloc. */
905 # define HEAP_START (ptr_t)0x40000000
907 # define HEAP_START DATAEND
910 /* HEURISTIC1 reportedly no longer works under 2.7. */
911 /* HEURISTIC2 probably works, but this appears to be preferable. */
912 /* Apparently USRSTACK is defined to be USERLIMIT, but in some */
913 /* installations that's undefined. We work around this with a */
915 # include <sys/vmparam.h>
917 /* This should work everywhere, but doesn't. */
918 # define STACKBOTTOM USRSTACK
923 # define GETPAGESIZE() sysconf(_SC_PAGESIZE)
924 /* getpagesize() appeared to be missing from at least one */
925 /* Solaris 5.4 installation. Weird. */
926 # define DYNAMIC_LOADING
929 # define OS_TYPE "DRSNX"
930 extern ptr_t GC_SysVGetDataStart(size_t, ptr_t);
932 # define DATASTART GC_SysVGetDataStart(0x10000, (ptr_t)etext)
933 # define MPROTECT_VDB
934 # define STACKBOTTOM ((ptr_t) 0xdfff0000)
935 # define DYNAMIC_LOADING
938 # define OS_TYPE "LINUX"
940 # define DYNAMIC_LOADING
942 Linux Sparc/a.out not supported
946 # define DATAEND (_end)
948 extern ptr_t GC_SysVGetDataStart(size_t, ptr_t);
950 # define DATASTART GC_SysVGetDataStart(0x100000, (ptr_t)_etext)
952 # define DATASTART GC_SysVGetDataStart(0x10000, (ptr_t)_etext)
954 # define LINUX_STACKBOTTOM
957 # define OS_TYPE "OPENBSD"
958 # define STACKBOTTOM ((ptr_t) 0xf8000000)
960 # define DATASTART ((ptr_t)(etext))
963 # define OS_TYPE "NETBSD"
966 # define DATASTART GC_data_start
967 # define DYNAMIC_LOADING
970 # define DATASTART ((ptr_t)(etext))
974 # define OS_TYPE "FREEBSD"
975 # define SIG_SUSPEND SIGUSR1
976 # define SIG_THR_RESTART SIGUSR2
977 # define FREEBSD_STACKBOTTOM
979 # define DYNAMIC_LOADING
984 # define NEED_FIND_LIMIT
985 # define DATASTART ((ptr_t)(&etext))
986 # define DATAEND (GC_find_limit (DATASTART, TRUE))
987 # define DATASTART2 ((ptr_t)(&edata))
988 # define DATAEND2 ((ptr_t)(&end))
993 # define MACH_TYPE "I386"
994 # if defined(__LP64__) || defined(_WIN64)
995 # error This should be handled as X86_64
997 # define CPP_WORDSZ 32
999 /* Appears to hold for all "32 bit" compilers */
1000 /* except Borland. The -a4 option fixes */
1002 /* Ivan Demakov: For Watcom the option is -zp4. */
1005 # define OS_TYPE "SEQUENT"
1007 # define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1008 # define STACKBOTTOM ((ptr_t) 0x3ffff000)
1011 # define OS_TYPE "BEOS"
1013 # define GETPAGESIZE() B_PAGE_SIZE
1015 # define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1018 # define OS_TYPE "SOLARIS"
1019 extern int _etext[], _end[];
1020 extern ptr_t GC_SysVGetDataStart(size_t, ptr_t);
1021 # define DATASTART GC_SysVGetDataStart(0x1000, (ptr_t)_etext)
1022 # define DATAEND (_end)
1023 /* # define STACKBOTTOM ((ptr_t)(_start)) worked through 2.7, */
1024 /* but reportedly breaks under 2.8. It appears that the stack */
1025 /* base is a property of the executable, so this should not break */
1026 /* old executables. */
1027 /* HEURISTIC2 probably works, but this appears to be preferable. */
1028 # include <sys/vm.h>
1029 # define STACKBOTTOM USRSTACK
1030 /* At least in Solaris 2.5, PROC_VDB gives wrong values for dirty bits. */
1031 /* It appears to be fixed in 2.8 and 2.9. */
1032 # ifdef SOLARIS25_PROC_VDB_BUG_FIXED
1035 # define DYNAMIC_LOADING
1036 # if !defined(USE_MMAP) && defined(REDIRECT_MALLOC)
1038 /* Otherwise we now use calloc. Mmap may result in the */
1039 /* heap interleaved with thread stacks, which can result in */
1040 /* excessive blacklisting. Sbrk is unusable since it */
1041 /* doesn't interact correctly with the system malloc. */
1044 # define HEAP_START (ptr_t)0x40000000
1046 # define HEAP_START DATAEND
1050 # define OS_TYPE "SCO"
1052 # define DATASTART ((ptr_t)((((word) (etext)) + 0x3fffff) \
1054 +((word)etext & 0xfff))
1055 # define STACKBOTTOM ((ptr_t) 0x7ffffffc)
1058 # define OS_TYPE "SCO_ELF"
1060 # define DATASTART ((ptr_t)(etext))
1061 # define STACKBOTTOM ((ptr_t) 0x08048000)
1062 # define DYNAMIC_LOADING
1063 # define ELF_CLASS ELFCLASS32
1066 # define OS_TYPE "DGUX"
1067 extern int _etext, _end;
1068 extern ptr_t GC_SysVGetDataStart(size_t, ptr_t);
1069 # define DATASTART GC_SysVGetDataStart(0x1000, (ptr_t)(&_etext))
1070 # define DATAEND (&_end)
1071 # define STACK_GROWS_DOWN
1073 # include <unistd.h>
1074 # define GETPAGESIZE() sysconf(_SC_PAGESIZE)
1075 # define DYNAMIC_LOADING
1078 # endif /* USE_MMAP */
1079 # define MAP_FAILED (void *) -1
1081 # define HEAP_START (ptr_t)0x40000000
1082 # else /* USE_MMAP */
1083 # define HEAP_START DATAEND
1084 # endif /* USE_MMAP */
1088 # define OS_TYPE "LINUX"
1089 # define LINUX_STACKBOTTOM
1093 # define STACK_GRAN 0x10000000
1094 /* STACKBOTTOM is usually 0xc0000000, but this changes with */
1095 /* different kernel configurations. In particular, systems */
1096 /* with 2GB physical memory will usually move the user */
1097 /* address space limit, and hence initial SP to 0x80000000. */
1099 # if !defined(GC_LINUX_THREADS) || !defined(REDIRECT_MALLOC)
1100 # define MPROTECT_VDB
1102 /* We seem to get random errors in incremental mode, */
1103 /* possibly because Linux threads is itself a malloc client */
1104 /* and can't deal with the signals. */
1106 # define HEAP_START (ptr_t)0x1000
1107 /* This encourages mmap to give us low addresses, */
1108 /* thus allowing the heap to grow to ~3GB */
1110 # define DYNAMIC_LOADING
1111 # ifdef UNDEFINED /* includes ro data */
1112 extern int _etext[];
1113 # define DATASTART ((ptr_t)((((word) (_etext)) + 0xfff) & ~0xfff))
1115 # include <features.h>
1116 # if defined(__GLIBC__) && __GLIBC__ >= 2
1117 # define SEARCH_FOR_DATA_START
1119 extern char **__environ;
1120 # define DATASTART ((ptr_t)(&__environ))
1121 /* hideous kludge: __environ is the first */
1122 /* word in crt0.o, and delimits the start */
1123 /* of the data segment, no matter which */
1124 /* ld options were passed through. */
1125 /* We could use _etext instead, but that */
1126 /* would include .rodata, which may */
1127 /* contain large read-only data tables */
1128 /* that we'd rather not scan. */
1131 # define DATAEND (_end)
1134 # define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1136 # ifdef USE_I686_PREFETCH
1137 /* FIXME: Thus should use __builtin_prefetch, but we'll leave that */
1138 /* for the next rtelease. */
1139 # define PREFETCH(x) \
1140 __asm__ __volatile__ (" prefetchnta %0": : "m"(*(char *)(x)))
1141 /* Empirically prefetcht0 is much more effective at reducing */
1142 /* cache miss stalls for the targetted load instructions. But it */
1143 /* seems to interfere enough with other cache traffic that the net */
1144 /* result is worse than prefetchnta. */
1146 /* Using prefetches for write seems to have a slight negative */
1147 /* impact on performance, at least for a PIII/500. */
1148 # define PREFETCH_FOR_WRITE(x) \
1149 __asm__ __volatile__ (" prefetcht0 %0": : "m"(*(char *)(x)))
1152 # ifdef USE_3DNOW_PREFETCH
1153 # define PREFETCH(x) \
1154 __asm__ __volatile__ (" prefetch %0": : "m"(*(char *)(x)))
1155 # define PREFETCH_FOR_WRITE(x) \
1156 __asm__ __volatile__ (" prefetchw %0": : "m"(*(char *)(x)))
1160 # define OS_TYPE "CYGWIN32"
1161 # define DATASTART ((ptr_t)GC_DATASTART) /* From gc.h */
1162 # define DATAEND ((ptr_t)GC_DATAEND)
1164 # define STACK_GRAN 0x10000
1168 # define OS_TYPE "OS2"
1169 /* STACKBOTTOM and DATASTART are handled specially in */
1170 /* os_dep.c. OS2 actually has the right */
1172 # define DATAEND /* not needed */
1175 # define OS_TYPE "MSWIN32"
1176 /* STACKBOTTOM and DATASTART are handled specially in */
1178 # if !defined(__WATCOMC__)
1179 # define MPROTECT_VDB
1180 /* We also avoided doing this in the past with GC_WIN32_THREADS */
1181 /* Hopefully that's fixed. */
1183 # if _MSC_VER >= 1300 /* .NET, i.e. > VisualStudio 6 */
1186 # define DATAEND /* not needed */
1189 # define OS_TYPE "MSWINCE"
1190 # define DATAEND /* not needed */
1193 # define OS_TYPE "DJGPP"
1194 # include "stubinfo.h"
1197 extern int __djgpp_stack_limit;
1198 # define DATASTART ((ptr_t)((((word) (etext)) + 0x1ff) & ~0x1ff))
1199 /* # define STACKBOTTOM ((ptr_t)((word) _stubinfo + _stubinfo->size \
1201 # define STACKBOTTOM ((ptr_t)((word) __djgpp_stack_limit + _stklen))
1202 /* This may not be right. */
1205 # define OS_TYPE "OPENBSD"
1208 # define OS_TYPE "FREEBSD"
1209 # ifndef GC_FREEBSD_THREADS
1210 # define MPROTECT_VDB
1213 # define SIG_SUSPEND (32+6)
1214 # define SIG_THR_RESTART (32+5)
1216 # define DATAEND (_end)
1218 # define SIG_SUSPEND SIGUSR1
1219 # define SIG_THR_RESTART SIGUSR2
1221 # define FREEBSD_STACKBOTTOM
1223 # define DYNAMIC_LOADING
1225 extern char etext[];
1226 extern char * GC_FreeBSDGetDataStart(size_t, ptr_t);
1227 # define DATASTART GC_FreeBSDGetDataStart(0x1000, (ptr_t)etext)
1230 # define OS_TYPE "NETBSD"
1232 # define DYNAMIC_LOADING
1236 # define OS_TYPE "THREE86BSD"
1239 # define OS_TYPE "BSDI"
1241 # if defined(OPENBSD) || defined(NETBSD) \
1242 || defined(THREE86BSD) || defined(BSDI)
1244 extern char etext[];
1245 # define DATASTART ((ptr_t)(etext))
1248 # define OS_TYPE "NEXT"
1249 # define DATASTART ((ptr_t) get_etext())
1250 # define STACKBOTTOM ((ptr_t)0xc0000000)
1251 # define DATAEND /* not needed */
1254 # define OS_TYPE "DOS4GW"
1255 extern long __nullarea;
1257 extern char *_STACKTOP;
1258 /* Depending on calling conventions Watcom C either precedes
1259 or does not precedes with undescore names of C-variables.
1260 Make sure startup code variables always have the same names. */
1261 #pragma aux __nullarea "*";
1262 #pragma aux _end "*";
1263 # define STACKBOTTOM ((ptr_t) _STACKTOP)
1264 /* confused? me too. */
1265 # define DATASTART ((ptr_t) &__nullarea)
1266 # define DATAEND ((ptr_t) &_end)
1269 # define OS_TYPE "HURD"
1270 # define STACK_GROWS_DOWN
1272 # define SIG_SUSPEND SIGUSR1
1273 # define SIG_THR_RESTART SIGUSR2
1274 # define SEARCH_FOR_DATA_START
1276 # define DATAEND ((ptr_t) (_end))
1277 /* # define MPROTECT_VDB Not quite working yet? */
1278 # define DYNAMIC_LOADING
1281 # define OS_TYPE "DARWIN"
1282 # define DARWIN_DONT_PARSE_STACK
1283 # define DYNAMIC_LOADING
1284 /* XXX: see get_end(3), get_etext() and get_end() should not be used.
1285 These aren't used when dyld support is enabled (it is by default) */
1286 # define DATASTART ((ptr_t) get_etext())
1287 # define DATAEND ((ptr_t) get_end())
1288 # define STACKBOTTOM ((ptr_t) 0xc0000000)
1290 # define USE_MMAP_ANON
1291 # ifdef GC_DARWIN_THREADS
1292 # define MPROTECT_VDB
1294 # include <unistd.h>
1295 # define GETPAGESIZE() getpagesize()
1296 /* There seems to be some issues with trylock hanging on darwin. This
1297 should be looked into some more */
1298 # define NO_PTHREAD_TRYLOCK
1299 # endif /* DARWIN */
1303 # define MACH_TYPE "NS32K"
1304 # define ALIGNMENT 4
1305 extern char **environ;
1306 # define DATASTART ((ptr_t)(&environ))
1307 /* hideous kludge: environ is the first */
1308 /* word in crt0.o, and delimits the start */
1309 /* of the data segment, no matter which */
1310 /* ld options were passed through. */
1311 # define STACKBOTTOM ((ptr_t) 0xfffff000) /* for Encore */
1315 # define MACH_TYPE "MIPS"
1317 /* This was developed for a linuxce style platform. Probably */
1318 /* needs to be tweaked for workstation class machines. */
1319 # define OS_TYPE "LINUX"
1320 # define DYNAMIC_LOADING
1322 # define DATAEND (_end)
1323 extern int __data_start[];
1324 # define DATASTART ((ptr_t)(__data_start))
1325 # define ALIGNMENT 4
1326 # if __GLIBC__ == 2 && __GLIBC_MINOR__ >= 2 || __GLIBC__ > 2
1327 # define LINUX_STACKBOTTOM
1329 # define STACKBOTTOM 0x80000000
1334 # if defined(_MIPS_SZPTR) && (_MIPS_SZPTR == 64)
1335 extern int _fdata[], _end[];
1336 # define DATASTART ((ptr_t)_fdata)
1337 # define DATAEND ((ptr_t)_end)
1338 # define CPP_WORDSZ _MIPS_SZPTR
1339 # define ALIGNMENT (_MIPS_SZPTR/8)
1341 extern int etext[], edata[], end[];
1342 extern int _DYNAMIC_LINKING[], _gp[];
1343 # define DATASTART ((ptr_t)((((word)etext + 0x3ffff) & ~0x3ffff) \
1344 + ((word)etext & 0xffff)))
1345 # define DATAEND (edata)
1346 # define DATASTART2 (_DYNAMIC_LINKING \
1347 ? (ptr_t)(((word)_gp + 0x8000 + 0x3ffff) & ~0x3ffff) \
1349 # define DATAEND2 (end)
1350 # define ALIGNMENT 4
1352 # define OS_TYPE "EWS4800"
1356 # define DATASTART (ptr_t)0x10000000
1357 /* Could probably be slightly higher since */
1358 /* startup code allocates lots of stuff. */
1359 # define OS_TYPE "ULTRIX"
1360 # define ALIGNMENT 4
1364 extern int _fdata[];
1365 # define DATASTART ((ptr_t)(_fdata))
1367 # define HEAP_START (ptr_t)0x30000000
1369 # define HEAP_START DATASTART
1371 /* Lowest plausible heap address. */
1372 /* In the MMAP case, we map there. */
1373 /* In either case it is used to identify */
1374 /* heap sections so they're not */
1375 /* considered as roots. */
1376 # define OS_TYPE "IRIX5"
1377 /*# define MPROTECT_VDB DOB: this should work, but there is evidence */
1378 /* of recent breakage. */
1380 # define CPP_WORDSZ _MIPS_SZPTR
1381 # define ALIGNMENT (_MIPS_SZPTR/8)
1383 # define ALIGNMENT 4
1385 # define DYNAMIC_LOADING
1388 # define OS_TYPE "MSWINCE"
1389 # define ALIGNMENT 4
1390 # define DATAEND /* not needed */
1392 # if defined(NETBSD)
1393 # define OS_TYPE "NETBSD"
1394 # define ALIGNMENT 4
1398 # define DATASTART GC_data_start
1399 # define NEED_FIND_LIMIT
1400 # define DYNAMIC_LOADING
1402 # define DATASTART ((ptr_t) 0x10000000)
1403 # define STACKBOTTOM ((ptr_t) 0x7ffff000)
1406 # if defined(NONSTOP)
1407 # define CPP_WORDSZ 32
1408 # define OS_TYPE "NONSTOP"
1409 # define ALIGNMENT 4
1410 # define DATASTART ((ptr_t) 0x08000000)
1411 extern char **environ;
1412 # define DATAEND ((ptr_t)(environ - 0x10))
1413 # define STACKBOTTOM ((ptr_t) 0x4fffffff)
1418 # define MACH_TYPE "HP_PA"
1420 # define CPP_WORDSZ 64
1421 # define ALIGNMENT 8
1423 # define CPP_WORDSZ 32
1424 # define ALIGNMENT 4
1426 # if !defined(GC_HPUX_THREADS) && !defined(GC_LINUX_THREADS)
1427 # ifndef LINUX /* For now. */
1428 # define MPROTECT_VDB
1431 # ifdef PARALLEL_MARK
1432 # define USE_MARK_BYTES
1433 /* Minimize compare-and-swap usage. */
1436 # define STACK_GROWS_UP
1438 # define OS_TYPE "HPUX"
1439 extern int __data_start[];
1440 # define DATASTART ((ptr_t)(__data_start))
1442 /* The following appears to work for 7xx systems running HP/UX */
1443 /* 9.xx Furthermore, it might result in much faster */
1444 /* collections than HEURISTIC2, which may involve scanning */
1445 /* segments that directly precede the stack. It is not the */
1446 /* default, since it may not work on older machine/OS */
1447 /* combinations. (Thanks to Raymond X.T. Nijssen for uncovering */
1449 # define STACKBOTTOM ((ptr_t) 0x7b033000) /* from /etc/conf/h/param.h */
1451 /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2 */
1452 /* to this. Note that the GC must be initialized before the */
1453 /* first putenv call. */
1454 extern char ** environ;
1455 # define STACKBOTTOM ((ptr_t)environ)
1457 # define DYNAMIC_LOADING
1458 # include <unistd.h>
1459 # define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1461 # define PREFETCH(x) { \
1462 register long addr = (long)(x); \
1463 (void) _asm ("LDW", 0, 0, addr, 0); \
1468 # define OS_TYPE "LINUX"
1469 # define LINUX_STACKBOTTOM
1470 # define DYNAMIC_LOADING
1471 # define SEARCH_FOR_DATA_START
1473 # define DATAEND (&_end)
1478 # define MACH_TYPE "ALPHA"
1479 # define ALIGNMENT 8
1480 # define CPP_WORDSZ 64
1482 # define OS_TYPE "NETBSD"
1484 # define DATASTART GC_data_start
1485 # define ELFCLASS32 32
1486 # define ELFCLASS64 64
1487 # define ELF_CLASS ELFCLASS64
1488 # define DYNAMIC_LOADING
1491 # define OS_TYPE "OPENBSD"
1493 # ifdef __ELF__ /* since OpenBSD/Alpha 2.9 */
1494 # define DATASTART GC_data_start
1495 # define ELFCLASS32 32
1496 # define ELFCLASS64 64
1497 # define ELF_CLASS ELFCLASS64
1498 # else /* ECOFF, until OpenBSD/Alpha 2.7 */
1499 # define DATASTART ((ptr_t) 0x140000000)
1503 # define OS_TYPE "FREEBSD"
1504 /* MPROTECT_VDB is not yet supported at all on FreeBSD/alpha. */
1505 # define SIG_SUSPEND SIGUSR1
1506 # define SIG_THR_RESTART SIGUSR2
1507 # define FREEBSD_STACKBOTTOM
1509 # define DYNAMIC_LOADING
1511 /* Handle unmapped hole alpha*-*-freebsd[45]* puts between etext and edata. */
1512 extern char etext[];
1513 extern char edata[];
1515 # define NEED_FIND_LIMIT
1516 # define DATASTART ((ptr_t)(&etext))
1517 # define DATAEND (GC_find_limit (DATASTART, TRUE))
1518 # define DATASTART2 ((ptr_t)(&edata))
1519 # define DATAEND2 ((ptr_t)(&end))
1522 # define OS_TYPE "OSF1"
1523 # define DATASTART ((ptr_t) 0x140000000)
1525 # define DATAEND ((ptr_t) &_end)
1526 extern char ** environ;
1527 /* round up from the value of environ to the nearest page boundary */
1528 /* Probably breaks if putenv is called before collector */
1529 /* initialization. */
1530 # define STACKBOTTOM ((ptr_t)(((word)(environ) | (getpagesize()-1))+1))
1531 /* # define HEURISTIC2 */
1532 /* Normally HEURISTIC2 is too conervative, since */
1533 /* the text segment immediately follows the stack. */
1534 /* Hence we give an upper pound. */
1535 /* This is currently unused, since we disabled HEURISTIC2 */
1536 extern int __start[];
1537 # define HEURISTIC2_LIMIT ((ptr_t)((word)(__start) & ~(getpagesize()-1)))
1538 # ifndef GC_OSF1_THREADS
1539 /* Unresolved signal issues with threads. */
1540 # define MPROTECT_VDB
1542 # define DYNAMIC_LOADING
1545 # define OS_TYPE "LINUX"
1546 # define LINUX_STACKBOTTOM
1548 # define SEARCH_FOR_DATA_START
1549 # define DYNAMIC_LOADING
1551 # define DATASTART ((ptr_t) 0x140000000)
1554 # define DATAEND (_end)
1555 # define MPROTECT_VDB
1556 /* Has only been superficially tested. May not */
1557 /* work on all versions. */
1562 # define MACH_TYPE "IA64"
1565 # define CPP_WORDSZ 32
1566 /* Requires 8 byte alignment for malloc */
1567 # define ALIGNMENT 4
1572 # define CPP_WORDSZ 64
1573 /* Requires 16 byte alignment for malloc */
1574 # define ALIGNMENT 8
1576 # define OS_TYPE "HPUX"
1577 extern int __data_start[];
1578 # define DATASTART ((ptr_t)(__data_start))
1579 /* Gustavo Rodriguez-Rivera suggested changing HEURISTIC2 */
1580 /* to this. Note that the GC must be initialized before the */
1581 /* first putenv call. */
1582 extern char ** environ;
1583 # define STACKBOTTOM ((ptr_t)environ)
1584 # define HPUX_STACKBOTTOM
1585 # define DYNAMIC_LOADING
1586 # include <unistd.h>
1587 # define GETPAGESIZE() sysconf(_SC_PAGE_SIZE)
1588 /* The following was empirically determined, and is probably */
1589 /* not very robust. */
1590 /* Note that the backing store base seems to be at a nice */
1591 /* address minus one page. */
1592 # define BACKING_STORE_DISPLACEMENT 0x1000000
1593 # define BACKING_STORE_ALIGNMENT 0x1000
1594 extern ptr_t GC_register_stackbottom;
1595 # define BACKING_STORE_BASE GC_register_stackbottom
1596 /* Known to be wrong for recent HP/UX versions!!! */
1599 # define CPP_WORDSZ 64
1600 # define ALIGNMENT 8
1601 # define OS_TYPE "LINUX"
1602 /* The following works on NUE and older kernels: */
1603 /* # define STACKBOTTOM ((ptr_t) 0xa000000000000000l) */
1604 /* This does not work on NUE: */
1605 # define LINUX_STACKBOTTOM
1606 /* We also need the base address of the register stack */
1607 /* backing store. This is computed in */
1608 /* GC_linux_register_stack_base based on the following */
1610 # define BACKING_STORE_ALIGNMENT 0x100000
1611 # define BACKING_STORE_DISPLACEMENT 0x80000000
1612 extern ptr_t GC_register_stackbottom;
1613 # define BACKING_STORE_BASE GC_register_stackbottom
1614 # define SEARCH_FOR_DATA_START
1616 # define DYNAMIC_LOADING
1618 /* In the Intel compiler environment, we seem to end up with */
1619 /* statically linked executables and an undefined reference */
1622 # define MPROTECT_VDB
1623 /* Requires Linux 2.3.47 or later. */
1625 # define DATAEND (_end)
1627 # ifndef __INTEL_COMPILER
1628 # define PREFETCH(x) \
1629 __asm__ (" lfetch [%0]": : "r"(x))
1630 # define PREFETCH_FOR_WRITE(x) \
1631 __asm__ (" lfetch.excl [%0]": : "r"(x))
1632 # define CLEAR_DOUBLE(x) \
1633 __asm__ (" stf.spill [%0]=f0": : "r"((void *)(x)))
1635 # include <ia64intrin.h>
1636 # define PREFETCH(x) \
1637 __lfetch(__lfhint_none, (x))
1638 # define PREFETCH_FOR_WRITE(x) \
1639 __lfetch(__lfhint_nta, (x))
1640 # define CLEAR_DOUBLE(x) \
1641 __stf_spill((void *)(x), 0)
1642 # endif // __INTEL_COMPILER
1646 /* FIXME: This is a very partial guess. There is no port, yet. */
1647 # define OS_TYPE "MSWIN32"
1648 /* STACKBOTTOM and DATASTART are handled specially in */
1650 # define DATAEND /* not needed */
1651 # if defined(_WIN64)
1652 # define CPP_WORDSZ 64
1654 # define CPP_WORDSZ 32 /* Is this possible? */
1656 # define ALIGNMENT 8
1657 # define STRTOULL _strtoui64
1662 # define MACH_TYPE "M88K"
1663 # define ALIGNMENT 4
1666 # define OS_TYPE "CX_UX"
1667 # define DATASTART ((((word)etext + 0x3fffff) & ~0x3fffff) + 0x10000)
1670 # define OS_TYPE "DGUX"
1671 extern ptr_t GC_SysVGetDataStart(size_t, ptr_t);
1672 # define DATASTART GC_SysVGetDataStart(0x10000, (ptr_t)etext)
1674 # define STACKBOTTOM ((char*)0xf0000000) /* determined empirically */
1678 /* If this still works, and if anyone cares, this should probably */
1679 /* be moved to the S390 category. */
1680 # define MACH_TYPE "S370"
1681 # define ALIGNMENT 4 /* Required by hardware */
1683 # define OS_TYPE "UTS4"
1685 extern int _etext[];
1687 extern ptr_t GC_SysVGetDataStart(size_t, ptr_t);
1688 # define DATASTART GC_SysVGetDataStart(0x10000, (ptr_t)_etext)
1689 # define DATAEND (_end)
1695 # define MACH_TYPE "S390"
1697 # define ALIGNMENT 4
1698 # define CPP_WORDSZ 32
1700 # define ALIGNMENT 8
1701 # define CPP_WORDSZ 64
1703 # define HBLKSIZE 4096
1707 # define OS_TYPE "LINUX"
1708 # define LINUX_STACKBOTTOM
1709 # define DYNAMIC_LOADING
1710 extern int __data_start[];
1711 # define DATASTART ((ptr_t)(__data_start))
1713 # define DATAEND (_end)
1714 # define CACHE_LINE_SIZE 256
1715 # define GETPAGESIZE() 4096
1720 # define CPP_WORDSZ 32
1721 # define MACH_TYPE "ARM32"
1722 # define ALIGNMENT 4
1724 # define OS_TYPE "NETBSD"
1727 # define DATASTART GC_data_start
1728 # define DYNAMIC_LOADING
1730 extern char etext[];
1731 # define DATASTART ((ptr_t)(etext))
1735 # define OS_TYPE "LINUX"
1736 # define LINUX_STACKBOTTOM
1738 # define STACK_GRAN 0x10000000
1740 # define DYNAMIC_LOADING
1741 # include <features.h>
1742 # if defined(__GLIBC__) && __GLIBC__ >= 2
1743 # define SEARCH_FOR_DATA_START
1745 extern char **__environ;
1746 # define DATASTART ((ptr_t)(&__environ))
1747 /* hideous kludge: __environ is the first */
1748 /* word in crt0.o, and delimits the start */
1749 /* of the data segment, no matter which */
1750 /* ld options were passed through. */
1751 /* We could use _etext instead, but that */
1752 /* would include .rodata, which may */
1753 /* contain large read-only data tables */
1754 /* that we'd rather not scan. */
1757 # define DATAEND (_end)
1760 # define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1764 # define OS_TYPE "MSWINCE"
1765 # define DATAEND /* not needed */
1768 /* __data_start is usually defined in the target linker script. */
1769 extern int __data_start[];
1770 # define DATASTART (ptr_t)(__data_start)
1771 /* __stack_base__ is set in newlib/libc/sys/arm/crt0.S */
1772 extern void *__stack_base__;
1773 # define STACKBOTTOM ((ptr_t) (__stack_base__))
1778 # define MACH_TYPE "CRIS"
1779 # define CPP_WORDSZ 32
1780 # define ALIGNMENT 1
1781 # define OS_TYPE "LINUX"
1782 # define DYNAMIC_LOADING
1783 # define LINUX_STACKBOTTOM
1784 # define SEARCH_FOR_DATA_START
1786 # define DATAEND (_end)
1790 # define MACH_TYPE "SH"
1791 # define ALIGNMENT 4
1793 # define OS_TYPE "MSWINCE"
1794 # define DATAEND /* not needed */
1797 # define OS_TYPE "LINUX"
1798 # define LINUX_STACKBOTTOM
1799 # define DYNAMIC_LOADING
1800 # define SEARCH_FOR_DATA_START
1802 # define DATAEND (_end)
1805 # define OS_TYPE "NETBSD"
1807 # define DATASTART GC_data_start
1808 # define DYNAMIC_LOADING
1813 # define MACH_TYPE "SH4"
1814 # define OS_TYPE "MSWINCE"
1815 # define ALIGNMENT 4
1816 # define DATAEND /* not needed */
1820 # define CPP_WORDSZ 32
1821 # define MACH_TYPE "M32R"
1822 # define ALIGNMENT 4
1824 # define OS_TYPE "LINUX"
1825 # define LINUX_STACKBOTTOM
1827 # define STACK_GRAN 0x10000000
1828 # define DYNAMIC_LOADING
1829 # define SEARCH_FOR_DATA_START
1831 # define DATAEND (_end)
1836 # define MACH_TYPE "X86_64"
1837 # define ALIGNMENT 8
1838 # define CPP_WORDSZ 64
1840 # define HBLKSIZE 4096
1842 # define CACHE_LINE_SIZE 64
1844 # define OS_TYPE "LINUX"
1845 # define LINUX_STACKBOTTOM
1846 # if !defined(GC_LINUX_THREADS) || !defined(REDIRECT_MALLOC)
1847 # define MPROTECT_VDB
1849 /* We seem to get random errors in incremental mode, */
1850 /* possibly because Linux threads is itself a malloc client */
1851 /* and can't deal with the signals. */
1854 # define DYNAMIC_LOADING
1855 # ifdef UNDEFINED /* includes ro data */
1856 extern int _etext[];
1857 # define DATASTART ((ptr_t)((((word) (_etext)) + 0xfff) & ~0xfff))
1859 # include <features.h>
1860 # define SEARCH_FOR_DATA_START
1862 # define DATAEND (_end)
1865 # define DATASTART ((ptr_t)((((word) (etext)) + 0xfff) & ~0xfff))
1867 # if defined(__GNUC__) && __GNUC__ >= 3
1868 # define PREFETCH(x) __builtin_prefetch((x), 0, 0)
1869 # define PREFETCH_FOR_WRITE(x) __builtin_prefetch((x), 1)
1873 # define OS_TYPE "DARWIN"
1874 # define DARWIN_DONT_PARSE_STACK
1875 # define DYNAMIC_LOADING
1876 /* XXX: see get_end(3), get_etext() and get_end() should not be used.
1877 These aren't used when dyld support is enabled (it is by default) */
1878 # define DATASTART ((ptr_t) get_etext())
1879 # define DATAEND ((ptr_t) get_end())
1880 # define STACKBOTTOM ((ptr_t) 0x7fff5fc00000)
1882 # define USE_MMAP_ANON
1883 # ifdef GC_DARWIN_THREADS
1884 # define MPROTECT_VDB
1886 # include <unistd.h>
1887 # define GETPAGESIZE() getpagesize()
1888 /* There seems to be some issues with trylock hanging on darwin. This
1889 should be looked into some more */
1890 # define NO_PTHREAD_TRYLOCK
1893 # define OS_TYPE "FREEBSD"
1894 # ifndef GC_FREEBSD_THREADS
1895 # define MPROTECT_VDB
1898 # define SIG_SUSPEND (32+6)
1899 # define SIG_THR_RESTART (32+5)
1901 # define DATAEND (_end)
1903 # define SIG_SUSPEND SIGUSR1
1904 # define SIG_THR_RESTART SIGUSR2
1906 # define FREEBSD_STACKBOTTOM
1908 # define DYNAMIC_LOADING
1910 extern char etext[];
1911 extern char * GC_FreeBSDGetDataStart();
1912 # define DATASTART GC_FreeBSDGetDataStart(0x1000, &etext)
1915 # define OS_TYPE "NETBSD"
1917 # define DYNAMIC_LOADING
1920 extern char etext[];
1921 # define SEARCH_FOR_DATA_START
1924 # define OS_TYPE "SOLARIS"
1925 # define ELF_CLASS ELFCLASS64
1926 extern int _etext[], _end[];
1927 extern ptr_t GC_SysVGetDataStart(size_t, ptr_t);
1928 # define DATASTART GC_SysVGetDataStart(0x1000, (ptr_t)_etext)
1929 # define DATAEND (_end)
1930 /* # define STACKBOTTOM ((ptr_t)(_start)) worked through 2.7, */
1931 /* but reportedly breaks under 2.8. It appears that the stack */
1932 /* base is a property of the executable, so this should not break */
1933 /* old executables. */
1934 /* HEURISTIC2 probably works, but this appears to be preferable. */
1935 /* Apparently USRSTACK is defined to be USERLIMIT, but in some */
1936 /* installations that's undefined. We work around this with a */
1938 # include <sys/vmparam.h>
1940 /* This should work everywhere, but doesn't. */
1941 # define STACKBOTTOM USRSTACK
1945 /* At least in Solaris 2.5, PROC_VDB gives wrong values for dirty bits. */
1946 /* It appears to be fixed in 2.8 and 2.9. */
1947 # ifdef SOLARIS25_PROC_VDB_BUG_FIXED
1950 # define DYNAMIC_LOADING
1951 # if !defined(USE_MMAP) && defined(REDIRECT_MALLOC)
1953 /* Otherwise we now use calloc. Mmap may result in the */
1954 /* heap interleaved with thread stacks, which can result in */
1955 /* excessive blacklisting. Sbrk is unusable since it */
1956 /* doesn't interact correctly with the system malloc. */
1959 # define HEAP_START (ptr_t)0x40000000
1961 # define HEAP_START DATAEND
1965 # define OS_TYPE "MSWIN32"
1966 /* STACKBOTTOM and DATASTART are handled specially in */
1968 # if !defined(__WATCOMC__)
1969 # define MPROTECT_VDB
1970 /* We also avoided doing this in the past with GC_WIN32_THREADS */
1971 /* Hopefully that's fixed. */
1973 # if _MSC_VER >= 1300 /* .NET, i.e. > VisualStudio 6 */
1976 # define DATAEND /* not needed */
1980 #if defined(LINUX) && defined(USE_MMAP)
1981 /* The kernel may do a somewhat better job merging mappings etc. */
1982 /* with anonymous mappings. */
1983 # define USE_MMAP_ANON
1986 #if defined(GC_LINUX_THREADS) && defined(REDIRECT_MALLOC)
1987 /* Nptl allocates thread stacks with mmap, which is fine. But it */
1988 /* keeps a cache of thread stacks. Thread stacks contain the */
1989 /* thread control blocks. These in turn contain a pointer to */
1990 /* (sizeof (void *) from the beginning of) the dtv for thread-local */
1991 /* storage, which is calloc allocated. If we don't scan the cached */
1992 /* thread stacks, we appear to lose the dtv. This tends to */
1993 /* result in something that looks like a bogus dtv count, which */
1994 /* tends to result in a memset call on a block that is way too */
1995 /* large. Sometimes we're lucky and the process just dies ... */
1996 /* There seems to be a similar issue with some other memory */
1997 /* allocated by the dynamic loader. */
1998 /* This can be avoided by either: */
1999 /* - Defining USE_PROC_FOR_LIBRARIES here. */
2000 /* That performs very poorly, precisely because we end up */
2001 /* scanning cached stacks. */
2002 /* - Have calloc look at its callers. That is currently what we do.*/
2003 /* In spite of the fact that it is gross and disgusting. */
2004 /* # define USE_PROC_FOR_LIBRARIES */
2007 # ifndef STACK_GROWS_UP
2008 # define STACK_GROWS_DOWN
2012 # define CPP_WORDSZ 32
2021 # define DATAEND (end)
2024 # if defined(SVR4) && !defined(GETPAGESIZE)
2025 # include <unistd.h>
2026 # define GETPAGESIZE() sysconf(_SC_PAGESIZE)
2029 # ifndef GETPAGESIZE
2030 # if defined(SOLARIS) || defined(IRIX5) || defined(LINUX) \
2031 || defined(NETBSD) || defined(FREEBSD) || defined(HPUX)
2032 # include <unistd.h>
2034 # define GETPAGESIZE() getpagesize()
2037 # if defined(SOLARIS) || defined(DRSNX) || defined(UTS4)
2038 /* OS has SVR4 generic features. */
2039 /* Probably others also qualify. */
2043 # if defined(SOLARIS) || defined(DRSNX)
2044 /* OS has SOLARIS style semi-undocumented interface */
2045 /* to dynamic loader. */
2047 /* OS has SOLARIS style signal handlers. */
2055 # if defined(FREEBSD) && \
2056 (defined(__DragonFly__) || __FreeBSD__ >= 4 || (__FreeBSD_kernel__ >= 4))
2060 # ifdef GC_NETBSD_THREADS
2061 # define SIGRTMIN 33
2062 # define SIGRTMAX 63
2065 # if defined(SVR4) || defined(LINUX) || defined(IRIX5) || defined(HPUX) \
2066 || defined(OPENBSD) || defined(NETBSD) || defined(FREEBSD) \
2067 || defined(DGUX) || defined(BSD) \
2068 || defined(AIX) || defined(DARWIN) || defined(OSF1) \
2070 # define UNIX_LIKE /* Basic Unix-like system calls work. */
2073 # if CPP_WORDSZ != 32 && CPP_WORDSZ != 64
2078 # undef DYNAMIC_LOADING
2083 # undef MPROTECT_VDB
2087 # ifdef SMALL_CONFIG
2088 /* Presumably not worth the space it takes. */
2090 # undef MPROTECT_VDB
2094 # undef MPROTECT_VDB /* Can't deal with address space holes. */
2097 # ifdef PARALLEL_MARK
2098 # undef MPROTECT_VDB /* For now. */
2101 # if !defined(PCR_VDB) && !defined(PROC_VDB) && !defined(MPROTECT_VDB) \
2102 && !defined(GWW_VDB)
2103 # define DEFAULT_VDB
2107 # define PREFETCH(x)
2108 # define NO_PREFETCH
2111 # ifndef PREFETCH_FOR_WRITE
2112 # define PREFETCH_FOR_WRITE(x)
2113 # define NO_PREFETCH_FOR_WRITE
2116 # ifndef CACHE_LINE_SIZE
2117 # define CACHE_LINE_SIZE 32 /* Wild guess */
2120 # if defined(LINUX) || defined(HURD) || defined(__GLIBC__)
2121 # define REGISTER_LIBRARIES_EARLY
2122 /* We sometimes use dl_iterate_phdr, which may acquire an internal */
2123 /* lock. This isn't safe after the world has stopped. So we must */
2124 /* call GC_register_dynamic_libraries before stopping the world. */
2125 /* For performance reasons, this may be beneficial on other */
2126 /* platforms as well, though it should be avoided in win32. */
2129 # if defined(SEARCH_FOR_DATA_START)
2130 extern ptr_t GC_data_start;
2131 # define DATASTART GC_data_start
2134 # ifndef CLEAR_DOUBLE
2135 # define CLEAR_DOUBLE(x) \
2136 ((word*)x)[0] = 0; \
2138 # endif /* CLEAR_DOUBLE */
2140 # if defined(GC_LINUX_THREADS) && defined(REDIRECT_MALLOC) \
2141 && !defined(INCLUDE_LINUX_THREAD_DESCR)
2142 /* Will not work, since libc and the dynamic loader use thread */
2143 /* locals, sometimes as the only reference. */
2144 # define INCLUDE_LINUX_THREAD_DESCR
2147 # if defined(GC_IRIX_THREADS) && !defined(IRIX5)
2148 --> inconsistent configuration
2150 # if defined(GC_LINUX_THREADS) && !defined(LINUX)
2151 --> inconsistent configuration
2153 # if defined(GC_NETBSD_THREADS) && !defined(NETBSD)
2154 --> inconsistent configuration
2156 # if defined(GC_SOLARIS_THREADS) && !defined(SOLARIS)
2157 --> inconsistent configuration
2159 # if defined(GC_HPUX_THREADS) && !defined(HPUX)
2160 --> inconsistent configuration
2162 # if defined(GC_AIX_THREADS) && !defined(_AIX)
2163 --> inconsistent configuration
2165 # if defined(GC_GNU_THREADS) && !defined(HURD)
2166 --> inconsistent configuration
2168 # if defined(GC_WIN32_THREADS) && !defined(MSWIN32) && !defined(CYGWIN32)
2169 --> inconsistent configuration
2172 # if defined(PCR) || defined(GC_WIN32_THREADS) || defined(GC_PTHREADS)
2176 # if !defined(USE_MARK_BITS) && !defined(USE_MARK_BYTES)
2177 # if defined(THREADS) && defined(PARALLEL_MARK)
2178 # define USE_MARK_BYTES
2180 # define USE_MARK_BITS
2184 # if defined(MSWINCE)
2189 # define ASM_CLEAR_CODE /* Stack clearing is crucial, and we */
2190 /* include assembly code to do it well. */
2193 /* Can we save call chain in objects for debugging? */
2194 /* SET NFRAMES (# of saved frames) and NARGS (#of args for each */
2195 /* frame) to reasonable values for the platform. */
2196 /* Set SAVE_CALL_CHAIN if we can. SAVE_CALL_COUNT can be specified */
2197 /* at build time, though we feel free to adjust it slightly. */
2198 /* Define NEED_CALLINFO if we either save the call stack or */
2199 /* GC_ADD_CALLER is defined. */
2200 /* GC_CAN_SAVE_CALL_STACKS is set in gc.h. */
2203 # define CAN_SAVE_CALL_ARGS
2205 #if (defined(I386) || defined(X86_64)) && (defined(LINUX) || defined(__GLIBC__))
2206 /* SAVE_CALL_CHAIN is supported if the code is compiled to save */
2207 /* frame pointers by default, i.e. no -fomit-frame-pointer flag. */
2208 # define CAN_SAVE_CALL_ARGS
2211 # if defined(SAVE_CALL_COUNT) && !defined(GC_ADD_CALLER) \
2212 && defined(GC_CAN_SAVE_CALL_STACKS)
2213 # define SAVE_CALL_CHAIN
2215 # ifdef SAVE_CALL_CHAIN
2216 # if defined(SAVE_CALL_NARGS) && defined(CAN_SAVE_CALL_ARGS)
2217 # define NARGS SAVE_CALL_NARGS
2219 # define NARGS 0 /* Number of arguments to save for each call. */
2222 # ifdef SAVE_CALL_CHAIN
2223 # ifndef SAVE_CALL_COUNT
2224 # define NFRAMES 6 /* Number of frames to save. Even for */
2225 /* alignment reasons. */
2227 # define NFRAMES ((SAVE_CALL_COUNT + 1) & ~1)
2229 # define NEED_CALLINFO
2230 # endif /* SAVE_CALL_CHAIN */
2231 # ifdef GC_ADD_CALLER
2234 # define NEED_CALLINFO
2237 # if defined(MAKE_BACK_GRAPH) && !defined(DBG_HDRS_ALL)
2238 # define DBG_HDRS_ALL
2241 # if defined(POINTER_MASK) && !defined(POINTER_SHIFT)
2242 # define POINTER_SHIFT 0
2245 # if defined(POINTER_SHIFT) && !defined(POINTER_MASK)
2246 # define POINTER_MASK ((GC_word)(-1))
2249 # if !defined(FIXUP_POINTER) && defined(POINTER_MASK)
2250 # define FIXUP_POINTER(p) (p) = ((p) & (POINTER_MASK) << POINTER_SHIFT)
2253 # if defined(FIXUP_POINTER)
2254 # define NEED_FIXUP_POINTER 1
2256 # define NEED_FIXUP_POINTER 0
2257 # define FIXUP_POINTER(p)
2260 # if !defined(MARK_BIT_PER_GRANULE) && !defined(MARK_BIT_PER_OBJ)
2261 # define MARK_BIT_PER_GRANULE /* Usually faster */
2264 /* Some static sanity tests. */
2265 # if defined(MARK_BIT_PER_GRANULE) && defined(MARK_BIT_PER_OBJ)
2266 # error Define only one of MARK_BIT_PER_GRANULE and MARK_BIT_PER_OBJ.
2269 # if defined(STACK_GROWS_UP) && defined(STACK_GROWS_DOWN)
2270 # error "Only one of STACK_GROWS_UP and STACK_GROWS_DOWN should be defd."
2272 # if !defined(STACK_GROWS_UP) && !defined(STACK_GROWS_DOWN)
2273 # error "One of STACK_GROWS_UP and STACK_GROWS_DOWN should be defd."
2276 # if defined(REDIRECT_MALLOC) && defined(THREADS) && !defined(LINUX)
2277 # error "REDIRECT_MALLOC with THREADS works at most on Linux."
2281 /* This relies on some type definitions from gc_priv.h, from */
2282 /* where it's normally included. */
2284 /* How to get heap memory from the OS: */
2285 /* Note that sbrk()-like allocation is preferred, since it */
2286 /* usually makes it possible to merge consecutively allocated */
2287 /* chunks. It also avoids unintented recursion with */
2288 /* -DREDIRECT_MALLOC. */
2289 /* GET_MEM() returns a HLKSIZE aligned chunk. */
2290 /* 0 is taken to mean failure. */
2291 /* In the case os USE_MMAP, the argument must also be a */
2292 /* physical page size. */
2293 /* GET_MEM is currently not assumed to retrieve 0 filled space, */
2294 /* though we should perhaps take advantage of the case in which */
2296 struct hblk; /* See gc_priv.h. */
2298 char * real_malloc();
2299 # define GET_MEM(bytes) HBLKPTR(real_malloc((size_t)bytes + GC_page_size) \
2302 void * os2_alloc(size_t bytes);
2303 # define GET_MEM(bytes) HBLKPTR((ptr_t)os2_alloc((size_t)bytes \
2306 # elif defined(NEXT) || defined(DOS4GW) || defined(NONSTOP) || \
2307 (defined(AMIGA) && !defined(GC_AMIGA_FASTALLOC)) || \
2308 (defined(SOLARIS) && !defined(USE_MMAP))
2309 # define GET_MEM(bytes) HBLKPTR((size_t) calloc(1, (size_t)bytes + GC_page_size) \
2311 # elif defined(MSWIN32)
2312 extern ptr_t GC_win32_get_mem();
2313 # define GET_MEM(bytes) (struct hblk *)GC_win32_get_mem(bytes)
2314 # elif defined(MACOS)
2315 # if defined(USE_TEMPORARY_MEMORY)
2316 extern Ptr GC_MacTemporaryNewPtr(size_t size, Boolean clearMemory);
2317 # define GET_MEM(bytes) HBLKPTR( \
2318 GC_MacTemporaryNewPtr(bytes + GC_page_size, true) \
2321 # define GET_MEM(bytes) HBLKPTR( \
2322 NewPtrClear(bytes + GC_page_size) + GC_page_size-1)
2324 # elif defined(MSWINCE)
2325 extern ptr_t GC_wince_get_mem();
2326 # define GET_MEM(bytes) (struct hblk *)GC_wince_get_mem(bytes)
2327 # elif defined(AMIGA) && defined(GC_AMIGA_FASTALLOC)
2328 extern void *GC_amiga_get_mem(size_t size);
2329 # define GET_MEM(bytes) HBLKPTR((size_t) \
2330 GC_amiga_get_mem((size_t)bytes + GC_page_size) \
2333 extern ptr_t GC_unix_get_mem();
2334 # define GET_MEM(bytes) (struct hblk *)GC_unix_get_mem(bytes)
2337 #endif /* GC_PRIVATE_H */
2339 # endif /* GCCONFIG_H */