From b27aca0a9eb9cf592477c6da46bdbdee82b2cd72 Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Mon, 22 Mar 1999 11:58:59 +0000 Subject: [PATCH] * keywords.c (scm_tc16_kw): Added for backward compatibility. Will be removed in next release. --- libguile/keywords.c | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/libguile/keywords.c b/libguile/keywords.c index ff8df679b..821624c0d 100644 --- a/libguile/keywords.c +++ b/libguile/keywords.c @@ -74,6 +74,10 @@ prin_keyword (exp, port, pstate) int scm_tc16_keyword; +/* This global is only kept for backward compatibility. + Will be removed in next release. */ +int scm_tc16_kw; + static scm_smobfuns keyword_smob = {scm_markcdr, free_keyword, prin_keyword, 0}; @@ -140,6 +144,7 @@ void scm_init_keywords () { scm_tc16_keyword = scm_newsmob (&keyword_smob); + scm_tc16_kw = scm_tc16_keyword; scm_keyword_obarray = scm_make_vector (SCM_MAKINUM (256), SCM_EOL); #include "keywords.x" }