diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2019-02-14 06:46:45 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2019-02-14 06:46:45 -0800 |
commit | 4477112731119ebc28d5e4a9dce858d8d008af36 (patch) | |
tree | 7ac7093b4b934dc4304f7f3984aebbea542506d8 /eval.c | |
parent | 014c61e860fce07cceee60efecd949a17e53f2ae (diff) | |
download | txr-4477112731119ebc28d5e4a9dce858d8d008af36.tar.gz txr-4477112731119ebc28d5e4a9dce858d8d008af36.tar.bz2 txr-4477112731119ebc28d5e4a9dce858d8d008af36.zip |
symdiff: new function.
* eval.c (eval_init): Register symdiff intrinsic.
* lib.c (symdiff): New function.
* lib.h (us_car_p, us_cdr_p): New inline functions.
(symdiff): Declared.
* txr.1: Documented, also fixing issues not related to
symdiff doc.
Diffstat (limited to 'eval.c')
-rw-r--r-- | eval.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -6748,6 +6748,7 @@ void eval_init(void) reg_fun(intern(lit("multi-sort"), user_package), func_n3o(multi_sort, 2)); reg_fun(intern(lit("set-diff"), user_package), func_n4o(set_diff, 2)); reg_fun(intern(lit("diff"), user_package), func_n4o(diff, 2)); + reg_fun(intern(lit("symdiff"), user_package), func_n4o(symdiff, 2)); reg_fun(intern(lit("isec"), user_package), func_n4o(isec, 2)); reg_fun(intern(lit("uni"), user_package), func_n4o(uni, 2)); |