Renaming c_true to tnil.

Macros called c_* should produce C counterparts of
Lisp val objects, like c_num and c_str.

* lib.h (c_true): Renamed to tnil.

* eval.c (lexical_var_p, lexical_fun_p): c_true to tnil.

* lib.c (less, chr_isalnum, chr_isalnum, chr_isalpha,
chr_isascii, chr_iscntrl, chr_isdigit, chr_isgraph,
chr_islower, chr_isprint, chr_ispunct, chr_isspace,
chr_isblank, chr_isunisp, chr_isupper, chr_isxdigit,
chr_toupper, keywordp): Likewise.

* stream.c (catenated_stream_p): Likewise.

* sysif.c (wifexited, wifsignaled, wcoredump, wifstopped,
wifcontinued): Likewise.

1 files changed, 1 insertions, 1 deletions

diff --git a/stream.c b/stream.c
index cde7e5b8..fe250f70 100644
--- a/stream.c
+++ b/stream.c
@@ -1870,7 +1870,7 @@ val make_catenated_stream_v(struct args *streams)
 
 val catenated_stream_p(val obj)
 {
-  return if2(streamp(obj), c_true(obj->co.ops == &cat_stream_ops.cobj_ops));
+  return if2(streamp(obj), tnil(obj->co.ops == &cat_stream_ops.cobj_ops));
 }
 
 val catenated_stream_push(val new_stream, val cat_stream)