Commit of gpdl-shared-device branch.

This commit is a squashed version of the gpdl-shared-device
branch. Essentially this is a first version of the new
language switching mechanism.

This does not build as part as "all", but rather as "experimental"
or "gpdl".

1 files changed, 4 insertions, 2 deletions

diff --git a/psi/igc.c b/psi/igc.c
index fce3d00f3..a2d016432 100644
--- a/psi/igc.c
+++ b/psi/igc.c
@@ -238,11 +238,13 @@ gs_gc_reclaim(vm_spaces * pspaces, bool global)
     /* Register the allocators themselves as roots, */
     /* so we mark and relocate the change and save lists properly. */
 
-    for_spaces(ispace, max_trace)
+    for_spaces(ispace, max_trace) {
+        rp = &space_roots[ispace];
         gs_register_struct_root((gs_memory_t *)space_memories[ispace],
-                                &space_roots[ispace],
+                                &rp,
                                 (void **)&space_memories[ispace],
                                 "gc_top_level");
+    }
 
     end_phase(state.heap,"register space roots");