0.pre7.50:

[sbcl.git] / src / runtime / gc.c

diff --git a/src/runtime/gc.c b/src/runtime/gc.c
index b7fee14..fc0b7df 100644 (file)
--- a/src/runtime/gc.c
+++ b/src/runtime/gc.c
@@ -1970,15 +1970,9 @@ gc_init(void)
 #ifdef __i386__
        scavtab[type_ClosureHeader] = scav_closure_header;
        scavtab[type_FuncallableInstanceHeader] = scav_closure_header;
-       scavtab[type_ByteCodeFunction] = scav_closure_header;
-       scavtab[type_ByteCodeClosure] = scav_closure_header;
-       /*      scavtab[type_DylanFunctionHeader] = scav_closure_header; */
 #else
        scavtab[type_ClosureHeader] = scav_boxed;
        scavtab[type_FuncallableInstanceHeader] = scav_boxed;
-       scavtab[type_ByteCodeFunction] = scav_boxed;
-       scavtab[type_ByteCodeClosure] = scav_boxed;
-       /* scavtab[type_DylanFunctionHeader] = scav_boxed; */
 #endif
        scavtab[type_ValueCellHeader] = scav_boxed;
         scavtab[type_SymbolHeader] = scav_boxed;
@@ -2059,8 +2053,6 @@ gc_init(void)
        transother[type_ReturnPcHeader] = trans_return_pc_header;
        transother[type_ClosureHeader] = trans_boxed;
        transother[type_FuncallableInstanceHeader] = trans_boxed;
-       transother[type_ByteCodeFunction] = trans_boxed;
-       transother[type_ByteCodeClosure] = trans_boxed;
        transother[type_ValueCellHeader] = trans_boxed;
        transother[type_SymbolHeader] = trans_boxed;
        transother[type_BaseChar] = trans_immediate;