diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2016-04-14 19:57:38 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2016-04-14 19:57:38 -0700 |
commit | 424696dc09a91939c8c5fb66975be0f737fac9aa (patch) | |
tree | 4ca0b46aaecb188d9ffdcb0a70e434e011d5cd0c /lib.c | |
parent | d790a3cca5309d86d752bb99a1eeaf3b6ee9c71b (diff) | |
download | txr-424696dc09a91939c8c5fb66975be0f737fac9aa.tar.gz txr-424696dc09a91939c8c5fb66975be0f737fac9aa.tar.bz2 txr-424696dc09a91939c8c5fb66975be0f737fac9aa.zip |
Fix proper-listp to proper-list-p.
This is really a gratuitous incompatibility with Common Lisp
and other dialects. Let's fix it internally also, but keep the
proper-listp function binding for backwards compatibility.
* eval.c (dot_to_apply, me_op): Update proper_listp
call to proper_list_p.
(eval_init): Register proper-list-p to the same C function as
proper-listp, and that C function is now called proper_list_p.
* lib.c (proper_listp): Renamed to proper_list_p.
* lib.h (proper_listp): Declaration updated.
* parser.y (define_transform): Update proper_listp call.
* txr.1: Replace all occurrences of proper-listp with
proper-list-p. Add note explaining the rename situation.
Diffstat (limited to 'lib.c')
-rw-r--r-- | lib.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2571,7 +2571,7 @@ val listp(val obj) return if2(obj == nil || consp(obj), t); } -val proper_listp(val obj) +val proper_list_p(val obj) { while (consp(obj)) obj = cdr(obj); |