fluids are tc7 objects

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

diff --git a/libguile/evalext.c b/libguile/evalext.c
index 5a0c0e9..9af8383 100644 (file)
--- a/libguile/evalext.c
+++ b/libguile/evalext.c
@@ -78,6 +78,8 @@ SCM_DEFINE (scm_self_evaluating_p, "self-evaluating?", 1, 0, 0,
        case scm_tc7_vector:
        case scm_tc7_wvect:
        case scm_tc7_hashtable:
+       case scm_tc7_fluid:
+       case scm_tc7_dynamic_state:
        case scm_tc7_number:
        case scm_tc7_string:
        case scm_tc7_smob: