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

temporary fix for a bug in the cwv optimizer

Browse Source 
svn: r4181
This commit is contained in:
Matthew Flatt 2006-08-29 02:32:13 +00:00
parent 61798f478e
commit a450214c08
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

@ -2343,7 +2343,7 @@ Scheme_Object *scheme_optimize_apply_values(Scheme_Object *f, Scheme_Object *e,
If we can shift-clone it, then it will be back in the right If we can shift-clone it, then it will be back in the right
coordinates. */ coordinates. */
cloned = scheme_optimize_clone(1, e, info, 0, 0); cloned = NULL; /* scheme_optimize_clone(1, e, info, 0, 0); */
if (cloned) { if (cloned) {
app2->rator = f_is_proc; app2->rator = f_is_proc;
app2->rand = cloned; app2->rand = cloned;