Displaying 1 result from an estimated 1 matches for "r_cstacklen".
2007 Aug 29
1
Modifying R_CheckStack for a speed increase
...<- function(x)
{
for (i in 1:N)
x <- x + 1
x
}
foo(0)
The crux of the modification is to change the following line in
R_CheckStack()
if(R_CStackLimit != -1 && usage > 0.95 * R_CStackLimit) {...
to
if(usage > R_CStackLen) { ...
Details and modified sources can be found at
ftp://ftp.sonic.net/pub/users/milbo.
Regards,
Stephen
http://milbo.users.sonic.net