From 521ff7cc679b735b27ecd3d7ce0b8dbd88f1c2ca Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 14 Jul 2016 06:58:59 -0600 Subject: [PATCH] fix broken GC-traversal registration Bug was part of 95f6a2342b --- racket/src/racket/src/type.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/racket/src/racket/src/type.c b/racket/src/racket/src/type.c index b7364792eb..190e0575e7 100644 --- a/racket/src/racket/src/type.c +++ b/racket/src/racket/src/type.c @@ -738,8 +738,8 @@ void scheme_register_traversers(void) GC_REG_TRAV(scheme_noninline_proc_type, small_object); GC_REG_TRAV(scheme_prune_context_type, small_object); - GC_REG_TRAV(scheme_proc_shape_type, struct_proc_shape); - GC_REG_TRAV(scheme_struct_proc_shape_type, small_atomic_obj); + GC_REG_TRAV(scheme_proc_shape_type, small_atomic_obj); + GC_REG_TRAV(scheme_struct_proc_shape_type, struct_proc_shape); GC_REG_TRAV(scheme_environment_variables_type, small_object); GC_REG_TRAV(scheme_syntax_property_preserve_type, small_object);