diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2011-10-24 00:57:54 -0400 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2011-10-24 00:57:54 -0400 |
commit | 23a6fd5129b285d25faa8198e395ac91db0348c4 (patch) | |
tree | 6bad524c53ea7aed6a792cff97cfa9290c519b07 /ChangeLog | |
parent | 69d40b9de060f88af224f1f27a7e020ccaabeddd (diff) | |
download | txr-23a6fd5129b285d25faa8198e395ac91db0348c4.tar.gz txr-23a6fd5129b285d25faa8198e395ac91db0348c4.tar.bz2 txr-23a6fd5129b285d25faa8198e395ac91db0348c4.zip |
Turning attention to some plumbing.
* unwind.c (uw_env_stack): New static variable.
(uw_unwind_to_exit_point): Maintain correct uw_env_stack
during unwinding.
(uw_find_env): Just retrieve the env stack pointer; no search.
(uw_push_env): Store a pointer to the previous
environmental frame and just initialize the bindings to nil.
No need to cons up a copy of the bindings from the previous frame.
(uw_get_func): Perform a search through the environment stack.
* unwind.h (struct uw_dynamic_env): New member, up_env.
Diffstat (limited to 'ChangeLog')
-rw-r--r-- | ChangeLog | 15 |
1 files changed, 15 insertions, 0 deletions
@@ -1,3 +1,18 @@ +2011-10-24 Kaz Kylheku <kaz@kylheku.com> + + Turning attention to some plumbing. + + * unwind.c (uw_env_stack): New static variable. + (uw_unwind_to_exit_point): Maintain correct uw_env_stack + during unwinding. + (uw_find_env): Just retrieve the env stack pointer; no search. + (uw_push_env): Store a pointer to the previous + environmental frame and just initialize the bindings to nil. + No need to cons up a copy of the bindings from the previous frame. + (uw_get_func): Perform a search through the environment stack. + + * unwind.h (struct uw_dynamic_env): New member, up_env. + 2011-10-23 Kaz Kylheku <kaz@kylheku.com> * tests/007/except-1.txr: Use next :list instead |