[cinvoke-svn] r137 - trunk/cinvoke/bindings/lua

[will]

Author: will
Date: 2006-12-27 11:06:52 -0500 (Wed, 27 Dec 2006)
New Revision: 137

Modified:
   trunk/cinvoke/bindings/lua/cinvoke_lua.c
Log:
committing Thomas Harning's lightuserdata pointer patch


Modified: trunk/cinvoke/bindings/lua/cinvoke_lua.c
===================================================================
--- trunk/cinvoke/bindings/lua/cinvoke_lua.c    2006-12-13 08:54:06 UTC (rev 
136)
+++ trunk/cinvoke/bindings/lua/cinvoke_lua.c    2006-12-27 16:06:52 UTC (rev 
137)
@@ -500,15 +500,15 @@
        return ret;
 }
 void push_ptr_val(lua_State *l, void *ptr) {
-       char buf[16];
-       sprintf(buf, "%p", ptr);
-       lua_pushstring(l, buf);
+       lua_pushlightuserdata(l, ptr);
 }
 void *get_ptr_val(lua_State *l, int index) {
        void *ret;
        const char *pstr;
        if (lua_isnil(l, index))
                return 0;
+       if(lua_isuserdata(l, index))
+               return lua_touserdata(l, index);
        pstr = lua_tostring(l, index);
        if (strlen(pstr) == 0) return 0;
        if (strlen(pstr) == 1 ||