[bugfix] dynamic-wind is broken
This commit is contained in:
parent
8421cfb00a
commit
4c6fe54d34
|
@ -81,7 +81,7 @@ pic_wind(pic_state *pic, struct checkpoint *here, struct checkpoint *there)
|
|||
pic_call(pic, pic_obj_value(there->in), 0);
|
||||
}
|
||||
else {
|
||||
pic_call(pic, pic_obj_value(there->out), 0);
|
||||
pic_call(pic, pic_obj_value(here->out), 0);
|
||||
pic_wind(pic, here->prev, there);
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue