          **** --> fetch the list of nodes rom LMEM
          ***/
         bool use_node = tid <  n_nodes0;
-        { prefix[tid] = nstack[ACCS<SHIFT>(c_stack0)];   c_stack0++; }
+#if 0
+        { prefixS[tid] = nstack[ACCS<SHIFT>(c_stack0)];   c_stack0++; }
         __syncthreads();
-        int node  = prefix[min(tid, n_nodes0 - 1)];
+        int node  = prefixS[min(tid, n_nodes0 - 1)];
+#else
+        int node;
+        { node = nstack[ACCS<SHIFT>(c_stack0)];   c_stack0++; }
+        __syncthreads();
+#endif
 
         if(n_nodes0 > 0){       //Work around pre 4.1 compiler bug
           n_nodes0 -= DIM;

#endif
            sh_mass[tid] = posj.w;
            sh_pos [tid] = make_float3(posj.x, posj.y, posj.z);
            sh_jid [tid] = body_list[n_direct + tid];  /* we need this to distinghuis between DM and *-particles */

            __syncthreads();
#if 1

          }

        }
        directM[tid] = body_list[tid];
        __syncthreads();
#endif
      } //end lvl
