summaryrefslogtreecommitdiff
path: root/libguile/eval.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/eval.c
parentb629af45cba2b34fee0ad078581d231df1e1b86c (diff)
downloadguile-1385d8aee3436a7166baeb7b5cc7ce27762561fd.tar.gz
Replace "scm_*_t" with "scm_t_*", except "scm_lisp_t".
Diffstat (limited to 'libguile/eval.c')
-rw-r--r--libguile/eval.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/eval.c b/libguile/eval.c
index fec45ac33..dad5aef6a 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -1044,7 +1044,7 @@ scm_m_cont (SCM xorig, SCM env SCM_UNUSED)
/* Multi-language support */
SCM_GLOBAL_SYMBOL (scm_lisp_nil, "nil");
-SCM_GLOBAL_SYMBOL (scm_t_lisp, "t");
+SCM_GLOBAL_SYMBOL (scm_lisp_t, "t");
SCM_SYNTAX (s_nil_cond, "nil-cond", scm_makmmacro, scm_m_nil_cond);
@@ -2419,7 +2419,7 @@ dispatch:
case (SCM_ISYMNUM (SCM_IM_T_IFY)):
x = SCM_CDR (x);
- RETURN (SCM_NFALSEP (EVALCAR (x, env)) ? scm_t_lisp : scm_lisp_nil)
+ RETURN (SCM_NFALSEP (EVALCAR (x, env)) ? scm_lisp_t : scm_lisp_nil)
case (SCM_ISYMNUM (SCM_IM_0_COND)):
proc = SCM_CDR (x);
@@ -4125,7 +4125,7 @@ scm_init_eval ()
#endif
scm_c_define ("nil", scm_lisp_nil);
- scm_c_define ("t", scm_t_lisp);
+ scm_c_define ("t", scm_lisp_t);
scm_add_feature ("delay");
}