[bugfix] dynamic-wind is broken

2016-02-23 20:29:27 +09:00
parent 8421cfb00a
commit 4c6fe54d34
1 changed files with 1 additions and 1 deletions
@@ -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);
  }
 }