1 --- clisp-2.35/src/spvw.d.orig 2005-08-18 18:56:55.000000000 +0200
2 +++ clisp-2.35/src/spvw.d 2005-10-10 13:25:37.000000000 +0200
4 # Don't use more than 36 address bits, otherwise mmap() fails.
5 part &= 0x0000000FFFFFFFFFUL;
7 + #if defined(DECALPHA) && defined(UNIX_LINUX)
8 + # Don't use more than 40 address bits, otherwise mmap() fails.
9 + part &= 0x000000FFFFFFFFFFUL;
11 mem.heaps[0].heap_limit = start + round_down(1*part,map_pagesize);
12 mem.heaps[1].heap_limit = start + round_down(4*part,map_pagesize);
14 @@ -2713,6 +2717,10 @@
15 # Don't use more than 36 address bits, otherwise mmap() fails.
16 part &= 0x0000000FFFFFFFFFUL;
18 + #if defined(DECALPHA) && defined(UNIX_LINUX)
19 + # Don't use more than 40 address bits, otherwise mmap() fails.
20 + part &= 0x000000FFFFFFFFFFUL;
22 mem.heaps[0].heap_limit = start + round_down(1*part,map_pagesize);
23 mem.heaps[0].heap_hardlimit =
24 mem.heaps[1].heap_limit = start + round_down(2*part,map_pagesize);
25 --- clisp-2.35/src/lispbibl.d.orig 2005-08-26 18:43:19.000000000 +0200
26 +++ clisp-2.35/src/lispbibl.d 2005-10-10 13:09:09.000000000 +0200
31 -#if (oint_addr_shift == 0) && (addr_shift == 0) && defined(TYPECODES) && !defined(WIDE_SOFT) && !(defined(SUN3) && !defined(UNIX_SUNOS4) && !defined(WIDE_SOFT)) && !(defined(AMD64) && defined(UNIX_LINUX))
32 +#if (oint_addr_shift == 0) && (addr_shift == 0) && defined(TYPECODES) && !defined(WIDE_SOFT) && !(defined(SUN3) && !defined(UNIX_SUNOS4) && !defined(WIDE_SOFT)) && !(defined(AMD64) && defined(UNIX_LINUX)) && !(defined(DECALPHA) && defined(UNIX_LINUX))
33 # If the address bits are the lower ones and not WIDE_SOFT,
34 # memory mapping may be possible.