get silly

2 files changed, 12 insertions, 7 deletions

diff --git a/src/lua.c b/src/lua.c
index eb9637b..33b9309 100644
--- a/src/lua.c
+++ b/src/lua.c
@@ -42,20 +42,22 @@ void i_dcopy(lua_State* src, lua_State* dest, void* _seen){
             at = lua_gettop(dest);

             at2 = lua_gettop(src);

 

-            *sp = at2;

+            *sp = at;

             whar = parray_get(seen, (void*)lua_topointer(src, at2));

             if( whar != NULL){

-                //printf("%s\n",lua_tostring(src, at2));

-                //printf("WHAR\n");

-                    

-                lua_pushvalue(dest, *(int*)whar);

+                //printf("%s\n",lua_tostring(src, at2 - 1));

+                printf("WHAR\n");

+                //lua_pop(dest, 1);

+                //lua_pushvalue(dest, *(int*)whar);

                 return;

             } else parray_set(seen, (void*)lua_topointer(src, at2), sp);

 

             lua_pushnil(src);

             for(;lua_next(src, at2) != 0;){

                 lua_pushvalue(src, -2);

-                

+                int a = lua_gettop(src);

+                l_pprint(src);

+                lua_settop(src, a);

                 i_dcopy(src, dest, seen);

 

                 lua_pushvalue(src, -2);

@@ -64,7 +66,7 @@ void i_dcopy(lua_State* src, lua_State* dest, void* _seen){
                 lua_settable(dest, at);

                 lua_pop(src, 3);

             }

-            lua_settop(dest, at);

+            //lua_settop(dest, at);

             break;

         case LUA_TFUNCTION:

             if(lua_iscfunction(src, old_top)){

@@ -90,6 +92,8 @@ void i_dcopy(lua_State* src, lua_State* dest, void* _seen){
             //lua_pushvalue(dest, -1);

             break;

         case LUA_TUSERDATA:

+            //printf("aww\n");

+            //lua_pushnumber(dest, 8);

             lua_pushlightuserdata(dest, lua_touserdata(src, -1));

             break;

         default:

diff --git a/src/net.c b/src/net.c
index ccfa28c..3447c02 100644
--- a/src/net.c
+++ b/src/net.c
@@ -370,6 +370,7 @@ void* handle_client(void *_arg){
   lua_getglobal(args->L, "_G");

   i_dcopy(args->L, L, NULL);

   lua_settop(args->L, old_top);

+  //l_pprint(L);

   lua_setglobal(L, "_G");

   pthread_mutex_unlock(&mutex);