suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

turn off over-agressive sfs clearing

Browse Source 
svn: r8603
This commit is contained in:
Matthew Flatt 2008-02-09 15:07:35 +00:00
parent 7ba3c6d79b
commit bae5ca3d59
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mzscheme/src/eval.c
View File

@ -3250,7 +3250,7 @@ Scheme_Object *scheme_optimize_shift(Scheme_Object *expr, int delta, int after_d
/*========================================================================*/ /*========================================================================*/
/* For debugging and measuring the worst-case cost of sfs clears: */ /* For debugging and measuring the worst-case cost of sfs clears: */
#define MAX_SFS_CLEARING 1 #define MAX_SFS_CLEARING 0
#define SFS_LOG(x) /* nothing */ #define SFS_LOG(x) /* nothing */