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);