diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2016-08-28 16:26:16 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2016-08-28 16:26:16 -0700 |
commit | 5fdd5b1289ba4f57d53e92d94eb192c7544499e9 (patch) | |
tree | f45d390748167b7ec3696bdc099f0f88fa4693ee /struct.c | |
parent | 0b8eb423973d7e2ebb15c4a6b18befdfe6b23692 (diff) | |
download | txr-5fdd5b1289ba4f57d53e92d94eb192c7544499e9.tar.gz txr-5fdd5b1289ba4f57d53e92d94eb192c7544499e9.tar.bz2 txr-5fdd5b1289ba4f57d53e92d94eb192c7544499e9.zip |
Precompute functions used by quasiquote optimizer.
* eval.c (consp_f, second_f, list_form_p_f, quote_form_p_f,
xform_listed_quote_f): New static variables.
(qquote_init): New function.
(optimize_qquote_form): Use list_form_p_f, quote_form_p_f, and
second_f instead of constructing functions locally.
(optimize_qquote_args): Use xform_listed_quote_f instead
of locally constructed function.
(eval_init): Call qquote_init.
Register second function to second_f.
Diffstat (limited to 'struct.c')
0 files changed, 0 insertions, 0 deletions