Use a TC7 tag instead of a SMOB for bytevectors.

[bpt/guile.git] / libguile / evalext.c

diff --git a/libguile/evalext.c b/libguile/evalext.c
index b1f185c..78b666f 100644 (file)
--- a/libguile/evalext.c
+++ b/libguile/evalext.c
@@ -83,6 +83,7 @@ SCM_DEFINE (scm_self_evaluating_p, "self-evaluating?", 1, 0, 0,
        case scm_tc7_smob:
        case scm_tc7_pws:
        case scm_tc7_program:
+       case scm_tc7_bytevector:
        case scm_tcs_subrs:
        case scm_tcs_struct:
          return SCM_BOOL_T;