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

fix meta-continuation depth when cloning

Browse Source 
svn: r5260
This commit is contained in:
Matthew Flatt 2007-01-08 07:18:02 +00:00
parent 20b834d84b
commit 5646c26ba9
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/fun.c
View File

@ -3917,7 +3917,7 @@ static Scheme_Meta_Continuation *clone_meta_cont(Scheme_Meta_Continuation *mc,
else else
depth = 0; depth = 0;
for (naya = first; cnt--; naya = naya->next) { for (naya = first; cnt--; naya = naya->next) {
first->depth = depth + cnt; naya->depth = depth + cnt;
} }
return first; return first;