summaryrefslogtreecommitdiff
path: root/libguile/mbstrings.c
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1996-09-13 11:07:24 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1996-09-13 11:07:24 +0000
commite2806c1000054f765c46bd14f8fb64a4d74d4eea (patch)
tree92ff61f63e724f41c946a22ed4944a67d304ade9 /libguile/mbstrings.c
parent1a80fb07a7658c8ba90dcda50d34547752469088 (diff)
downloadguile-e2806c1000054f765c46bd14f8fb64a4d74d4eea.tar.gz
* __scm.h, chars.c, debug.c, eval.c, eval.h, extchrs.c, extchrs.h,
fdsocket.c, feature.c, mbstrings.c, mbstrings.h, numbers.c, numbers.h, print.c, scmhob.h, simpos.h, symbols.c, symbols.h, tags.h, throw.c, variable.h: Name cleanup. Lots of xxxSCM_yyy removed. (These were introduced by unsupervised name substitution.)
Diffstat (limited to 'libguile/mbstrings.c')
-rw-r--r--libguile/mbstrings.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/mbstrings.c b/libguile/mbstrings.c
index a6f5ea677..e6a992c18 100644
--- a/libguile/mbstrings.c
+++ b/libguile/mbstrings.c
@@ -193,7 +193,7 @@ scm_symbol_multi_byte_p (symbol)
SCM symbol;
#endif
{
- return SCM_SYMBOL_MULTI_BYTE_SCM_STRINGP(symbol);
+ return SCM_SYMBOL_MULTI_BYTE_STRINGP(symbol);
}
SCM_PROC(s_set_symbol_multi_byte_x, "set-symbol-multi-byte!", 2, 0, 0, scm_set_symbol_multi_byte_x);
@@ -209,7 +209,7 @@ scm_set_symbol_multi_byte_x (symbol, val)
{
if (SCM_TYP7 (symbol) == scm_tc7_msymbol)
{
- SCM_SYMBOL_MULTI_BYTE_SCM_STRINGP(symbol) = (SCM_FALSEP (val)
+ SCM_SYMBOL_MULTI_BYTE_STRINGP(symbol) = (SCM_FALSEP (val)
? SCM_BOOL_F
: SCM_BOOL_T);
}