+ /* copy the registry */
+ lua_pushvalue(father, LUA_REGISTRYINDEX); /* father: ... reg */
+ lua_newtable(L); /* L: visited */
+ move_value(L, father, "registry"); /* father: ...
+ L: visited newreg */
+
+ /* set the pointer again */
+ lua_pushlightuserdata(L, father); /* L: visited newreg father */
+ lua_setfield(L, -1, "simgrid.father_state"); /* L: visited newreg */
+ lua_replace(L, LUA_REGISTRYINDEX); /* L: visited */
+ lua_pop(L, 1); /* L: -- */
+