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

double-check that nested continuation is really nested

Browse Source 
svn: r2561
This commit is contained in:
Robby Findler 2006-03-31 21:38:08 +00:00
parent dd89364c2d
commit 2670a1d075
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/mzscheme/src/setjmpup.c
View File

@ -457,6 +457,12 @@ int scheme_setjmpup_relative(Scheme_Jumpup_Buf *b, void *base,
FLUSH_REGISTER_WINDOWS;
if (c) {
if (STK_COMP(c->buf.stack_from, start)) {
c = NULL;
}
}
if (STK_COMP((unsigned long)start, (unsigned long)&local))
start = (void *)&local;