diff options
Diffstat (limited to 'libguile/objects.c')
-rw-r--r-- | libguile/objects.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/objects.c b/libguile/objects.c index 483ef2b83..2486b4f7d 100644 --- a/libguile/objects.c +++ b/libguile/objects.c @@ -94,7 +94,7 @@ scm_class_of (SCM x) return scm_class_integer; case scm_tc3_imm24: - if (SCM_ICHRP (x)) + if (SCM_CHARP (x)) return scm_class_char; else { |