diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2016-11-18 06:42:36 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2016-11-18 06:42:36 -0800 |
| commit | 7cea70b7547d6e3410a04c87ed12533261a39685 (patch) | |
| tree | c4315ece69fd4f5e8affa1eeb6815f19aaf7651e /arith.h | |
| parent | 9e77cfa7e863eb9320867749967a3b39fc54629c (diff) | |
| download | txr-7cea70b7547d6e3410a04c87ed12533261a39685.tar.gz txr-7cea70b7547d6e3410a04c87ed12533261a39685.tar.bz2 txr-7cea70b7547d6e3410a04c87ed12533261a39685.zip | |
Reproduce shared structure in sys:switch expansion.
* eval.c (expand_forms_ss): New static function:
like eval_forms but preserves shared substructure
along the spine of the list.
(expand_list_of_form_lists): Use expand_forms_ss
instead of expand_forms, taking the required hash
via a new parameter.
(expand_switch): Instantiate the required hash table
and pass down to expand_list_of_form_lists.
Diffstat (limited to 'arith.h')
0 files changed, 0 insertions, 0 deletions