degenerate let forms

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

diff --git a/libguile/evalext.c b/libguile/evalext.c
index 897cabe..48a9eff 100644 (file)
--- a/libguile/evalext.c
+++ b/libguile/evalext.c
@@ -81,12 +81,11 @@ SCM_DEFINE (scm_self_evaluating_p, "self-evaluating?", 1, 0, 0,
        case scm_tc7_fluid:
        case scm_tc7_dynamic_state:
         case scm_tc7_frame:
-        case scm_tc7_vm:
         case scm_tc7_vm_cont:
        case scm_tc7_number:
        case scm_tc7_string:
        case scm_tc7_smob:
-       case scm_tc7_rtl_program:
+       case scm_tc7_program:
        case scm_tc7_bytevector:
        case scm_tc7_array:
        case scm_tc7_bitvector: