From 2133f052857d39b8d0c55f095bb0f32d7fe36c7b Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Wed, 17 Apr 2013 09:04:28 -0700 Subject: [PATCH] Revert this commit when the release can build without it. These last vestiges of TC_COMBINATION_1, TC_COMBINATION_2, TC_PCOMB0, TC_PCOMB1, and TC_PCOMB2 remain only to allow building directly from release 9.1. --- src/microcode/gcloop.c | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/microcode/gcloop.c b/src/microcode/gcloop.c index 557be8d24..518e32508 100644 --- a/src/microcode/gcloop.c +++ b/src/microcode/gcloop.c @@ -1251,15 +1251,15 @@ gc_type_t gc_type_map [N_TYPE_CODES] = GC_PAIR, /* TC_LIST */ GC_NON_POINTER, /* TC_CHARACTER */ GC_PAIR, /* TC_SCODE_QUOTE */ - GC_UNDEFINED, /* TC_PCOMB2 */ + GC_TRIPLE, /* TC_PCOMB2 */ GC_PAIR, /* TC_UNINTERNED_SYMBOL */ GC_VECTOR, /* TC_BIG_FLONUM */ - GC_UNDEFINED, /* TC_COMBINATION_1 */ + GC_PAIR, /* TC_COMBINATION_1 */ GC_NON_POINTER, /* TC_CONSTANT */ GC_PAIR, /* TC_EXTENDED_PROCEDURE */ GC_VECTOR, /* TC_VECTOR */ GC_NON_POINTER, /* TC_RETURN_CODE */ - GC_UNDEFINED, /* TC_COMBINATION_2 */ + GC_TRIPLE, /* TC_COMBINATION_2 */ GC_SPECIAL, /* TC_MANIFEST_CLOSURE */ GC_VECTOR, /* TC_BIG_FIXNUM */ GC_PAIR, /* TC_PROCEDURE */ @@ -1274,7 +1274,7 @@ gc_type_t gc_type_map [N_TYPE_CODES] = GC_NON_POINTER, /* TC_PRIMITIVE */ GC_PAIR, /* TC_SEQUENCE */ GC_NON_POINTER, /* TC_FIXNUM */ - GC_UNDEFINED, /* TC_PCOMB1 */ + GC_PAIR, /* TC_PCOMB1 */ GC_VECTOR, /* TC_CONTROL_POINT */ GC_PAIR, /* TC_INTERNED_SYMBOL */ GC_VECTOR, /* TC_CHARACTER_STRING,TC_VECTOR_8B */ @@ -1289,13 +1289,13 @@ gc_type_t gc_type_map [N_TYPE_CODES] = GC_SPECIAL, /* TC_MANIFEST_NM_VECTOR */ GC_COMPILED, /* TC_COMPILED_ENTRY */ GC_PAIR, /* TC_LEXPR */ - GC_UNDEFINED, /* TC_PCOMB3 */ + GC_VECTOR, /* TC_PCOMB3 */ GC_VECTOR, /* TC_EPHEMERON */ GC_TRIPLE, /* TC_VARIABLE */ GC_NON_POINTER, /* TC_THE_ENVIRONMENT */ GC_PAIR, /* TC_SYNTAX_ERROR */ GC_VECTOR, /* TC_VECTOR_1B,TC_BIT_STRING */ - GC_UNDEFINED, /* TC_PCOMB0 */ + GC_NON_POINTER, /* TC_PCOMB0 */ GC_VECTOR, /* TC_VECTOR_16B */ GC_SPECIAL, /* TC_REFERENCE_TRAP */ GC_UNDEFINED, /* 0x33 */ -- 2.25.1