summaryrefslogtreecommitdiff
path: root/libguile/lang.c
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2001-06-14 20:14:09 +0000
committerMarius Vollmer <mvo@zagadka.de>2001-06-14 20:14:09 +0000
commit1385d8aee3436a7166baeb7b5cc7ce27762561fd (patch)
treed52e3a776a53e7b5675c0ca44c27ea41629e71dd /libguile/lang.c
parentb629af45cba2b34fee0ad078581d231df1e1b86c (diff)
downloadguile-1385d8aee3436a7166baeb7b5cc7ce27762561fd.tar.gz
Replace "scm_*_t" with "scm_t_*", except "scm_lisp_t".
Diffstat (limited to 'libguile/lang.c')
-rw-r--r--libguile/lang.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/lang.c b/libguile/lang.c
index ee15c66ac..82378e0ff 100644
--- a/libguile/lang.c
+++ b/libguile/lang.c
@@ -114,7 +114,7 @@ SCM_DEFINE (scm_null, "null", 1, 0, 0,
"return LISP's nil otherwise.")
#define FUNC_NAME s_scm_null
{
- return (SCM_NILP (x) || SCM_NULLP (x) || SCM_FALSEP (x)) ? scm_t_lisp : scm_lisp_nil;
+ return (SCM_NILP (x) || SCM_NULLP (x) || SCM_FALSEP (x)) ? scm_lisp_t : scm_lisp_nil;
}
#undef FUNC_NAME
@@ -146,7 +146,7 @@ SCM_DEFINE1 (scm_nil_eq, "nil-eq", scm_tc7_rpsubr,
return ((SCM_EQ_P (x, y)
|| (SCM_NILP (x) && (SCM_NULLP (y) || SCM_FALSEP (y)))
|| (SCM_NILP (y) && (SCM_NULLP (x) || SCM_FALSEP (x))))
- ? scm_t_lisp
+ ? scm_lisp_t
: scm_lisp_nil);
}
#undef FUNC_NAME