Increased maximum memory allocation
This commit is contained in:
parent
67443e1d46
commit
396e214b5f
|
@ -4,4 +4,4 @@
|
||||||
(cond ((= n 1) 1)
|
(cond ((= n 1) 1)
|
||||||
(t (* n (fact (- n 1)))))))
|
(t (* n (fact (- n 1)))))))
|
||||||
|
|
||||||
(fact 21)
|
(fact 1000)
|
||||||
|
|
|
@ -9,7 +9,7 @@
|
||||||
* to) is the maximum value of an unsigned 32 bit integer, which is to
|
* to) is the maximum value of an unsigned 32 bit integer, which is to
|
||||||
* say 4294967296. However, we'll start small.
|
* say 4294967296. However, we'll start small.
|
||||||
*/
|
*/
|
||||||
#define CONSPAGESIZE 8
|
#define CONSPAGESIZE 1024
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* the number of cons pages we will initially allow for. For
|
* the number of cons pages we will initially allow for. For
|
||||||
|
@ -25,7 +25,7 @@
|
||||||
* of addressable memory, which is only slightly more than the
|
* of addressable memory, which is only slightly more than the
|
||||||
* number of atoms in the universe.
|
* number of atoms in the universe.
|
||||||
*/
|
*/
|
||||||
#define NCONSPAGES 8
|
#define NCONSPAGES 64
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* a cons page is essentially just an array of cons space objects. It
|
* a cons page is essentially just an array of cons space objects. It
|
||||||
|
|
Loading…
Reference in a new issue