diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2016-06-14 06:39:40 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2016-06-14 06:39:40 -0700 |
commit | dc762ad28b50ea100cd21476528e658ea62aaa8d (patch) | |
tree | 419acdfa05bbe8d2e49be7c788b1d5959656b6bd /tests/002 | |
parent | deb347331588a1a0b030c4e92fbc804b4e6c74fc (diff) | |
download | txr-dc762ad28b50ea100cd21476528e658ea62aaa8d.tar.gz txr-dc762ad28b50ea100cd21476528e658ea62aaa8d.tar.bz2 txr-dc762ad28b50ea100cd21476528e658ea62aaa8d.zip |
Replace most TXR eval with Lisp eval.
* match.c (tlist_k): New keyword symbol variable.
(tleval_144): New static function.
(h_skip): evaluate min and max arguments as Lisp.
(h_coll): Evaluate all numeric keyword arguments as
Lisp: :min, :max, :gap, :times, :maxtimes, :mintimes,
:chars.
(h_call): Evaluate function expression as Lisp.
(do_output_line, do_output): Evaluate n and m parameters
in @(modlast) and @(mod) as Lisp.
(v_skip): Evaluate min and max as Lisp.
(v_fuzz): Evaluate m and n as Lisp.
(v_freeform): Evaluate arguments as Lisp.
(v_next): Support new argument, :tlist, which is like
:list, but with TXR style evaluation. From now on :list
uses Lisp evaluation, unless compatibility is set to 143
or lower. Also, evaluate the :string argument as Lisp.
(v_collect): Evaluate all numeric keyword arguments as
Lisp: :min, :max, :gap, :times, :maxtimes, :mintimes,
:lines.
(v_output): Evaluate stream in :continue or :finish
expression as Lisp.
(v_load): Evaluate load target as Lisp.
(v_close): Evaluate stream argument as Lisp.
(v_call): Evaluate function expression as Lisp.
(syms_init): Initialize tlist_k variable.
* tests/007/except-1.txr: Use :tlist instead of :list,
since argument is a TXR list expression.
* tests/010/block.txr: Likewise.
Diffstat (limited to 'tests/002')
0 files changed, 0 insertions, 0 deletions