diff options
author | obache <obache@pkgsrc.org> | 2013-07-07 05:19:39 +0000 |
---|---|---|
committer | obache <obache@pkgsrc.org> | 2013-07-07 05:19:39 +0000 |
commit | ca656ee5874792588a986f4c860600e5f5db0273 (patch) | |
tree | ceb497bf96e9f685b3c36ecfe00dd531fdbf6c5b /databases/tokyotyrant | |
parent | 822d2d64f1ca9bf5ec5f22132cb3969ae3ddd4eb (diff) | |
download | pkgsrc-ca656ee5874792588a986f4c860600e5f5db0273.tar.gz |
Fixes build failure due to Lua-5.2 API change.
Diffstat (limited to 'databases/tokyotyrant')
-rw-r--r-- | databases/tokyotyrant/distinfo | 3 | ||||
-rw-r--r-- | databases/tokyotyrant/patches/patch-scrext.c | 111 |
2 files changed, 113 insertions, 1 deletions
diff --git a/databases/tokyotyrant/distinfo b/databases/tokyotyrant/distinfo index b408c5f84f7..26a0f528ad7 100644 --- a/databases/tokyotyrant/distinfo +++ b/databases/tokyotyrant/distinfo @@ -1,4 +1,4 @@ -$NetBSD: distinfo,v 1.25 2010/08/06 04:39:22 obache Exp $ +$NetBSD: distinfo,v 1.26 2013/07/07 05:19:39 obache Exp $ SHA1 (tokyotyrant-1.1.41.tar.gz) = 060ac946a9ac902c1d244ffafd444f0e5840c0ce RMD160 (tokyotyrant-1.1.41.tar.gz) = 679122c30104213991c640e4c9d4d0203308190a @@ -6,3 +6,4 @@ Size (tokyotyrant-1.1.41.tar.gz) = 196196 bytes SHA1 (patch-aa) = d1c6aa7e3197b33a1988320ca5ad865ae3fa23c4 SHA1 (patch-ab) = c263651729d1b8ce4fccb877869cc577577b260e SHA1 (patch-ac) = fc87f88b82b8c49f340eb6707f4c2f8382eb2a7b +SHA1 (patch-scrext.c) = 4db91ba450574889ed3e06092074b9a4cda834fe diff --git a/databases/tokyotyrant/patches/patch-scrext.c b/databases/tokyotyrant/patches/patch-scrext.c new file mode 100644 index 00000000000..83838b047e3 --- /dev/null +++ b/databases/tokyotyrant/patches/patch-scrext.c @@ -0,0 +1,111 @@ +$NetBSD: patch-scrext.c,v 1.1 2013/07/07 05:19:39 obache Exp $ + +* Lua-5.2 API change (lua_objlen was renamed lua_rawlen). + +--- scrext.c.orig 2010-08-05 06:24:33.000000000 +0000 ++++ scrext.c +@@ -389,7 +389,7 @@ char *scrextcallmethod(void *scr, const + } + break; + case LUA_TTABLE: +- if(lua_objlen(lua, 1) > 0){ ++ if(lua_rawlen(lua, 1) > 0){ + lua_rawgeti(lua, 1, 1); + switch(lua_type(lua, -1)){ + case LUA_TNUMBER: +@@ -879,7 +879,7 @@ static int serv_misc(lua_State *lua){ + tclistpush(args, aptr, asiz); + break; + case LUA_TTABLE: +- len = lua_objlen(lua, i); ++ len = lua_rawlen(lua, i); + for(int j = 1; j <= len; j++){ + lua_rawgeti(lua, i, j); + switch(lua_type(lua, -1)){ +@@ -970,7 +970,7 @@ static int serv_mapreduce(lua_State *lua + tclistpush(keys, kbuf, ksiz); + break; + case LUA_TTABLE: +- len = lua_objlen(lua, 3); ++ len = lua_rawlen(lua, 3); + keys = tclistnew2(len); + for(int i = 1; i <= len; i++){ + lua_rawgeti(lua, 3, i); +@@ -1311,7 +1311,7 @@ static int serv_pack(lua_State *lua){ + lua_rawseti(lua, aidx, eidx++); + break; + case LUA_TTABLE: +- len = lua_objlen(lua, i); ++ len = lua_rawlen(lua, i); + for(int j = 1; j <= len; j++){ + lua_rawgeti(lua, i, j); + lua_rawseti(lua, aidx, eidx++); +@@ -1983,7 +1983,7 @@ static int serv_ucs(lua_State *lua){ + lua_error(lua); + } + if(lua_type(lua, 1) == LUA_TTABLE){ +- int anum = lua_objlen(lua, 1); ++ int anum = lua_rawlen(lua, 1); + uint16_t *ary = tcmalloc(sizeof(*ary) * anum + 1); + for(int i = 1; i <= anum; i++){ + lua_rawgeti(lua, 1, i); +@@ -2043,7 +2043,7 @@ static int serv_dist(lua_State *lua){ + static int serv_isect(lua_State *lua){ + int argc = lua_gettop(lua); + if(argc == 1 && lua_type(lua, 1) == LUA_TTABLE){ +- int len = lua_objlen(lua, 1); ++ int len = lua_rawlen(lua, 1); + for(int i = 1; i <= len; i++){ + lua_rawgeti(lua, 1, i); + if(lua_type(lua, -1) == LUA_TTABLE){ +@@ -2062,7 +2062,7 @@ static int serv_isect(lua_State *lua){ + int rnum = 0; + for(int i = 1; i <= argc; i++){ + if(lua_type(lua, i) != LUA_TTABLE) continue; +- int len = lua_objlen(lua, i); ++ int len = lua_rawlen(lua, i); + if(len < 1){ + lua_settop(lua, 0); + lua_newtable(lua); +@@ -2076,7 +2076,7 @@ static int serv_isect(lua_State *lua){ + TCMAP *latter = NULL; + for(int i = 1; i <= argc; i++){ + if(lua_type(lua, i) != LUA_TTABLE) continue; +- int len = lua_objlen(lua, i); ++ int len = lua_rawlen(lua, i); + if(former){ + latter = tcmapnew2(tclmin(len, tcmaprnum(former))); + for(int j = 1; j <= len; j++){ +@@ -2121,7 +2121,7 @@ static int serv_isect(lua_State *lua){ + TCMAP *freq = tcmapnew2(rnum); + for(int i = 1; i <= argc; i++){ + if(lua_type(lua, i) != LUA_TTABLE) continue; +- int len = lua_objlen(lua, i); ++ int len = lua_rawlen(lua, i); + TCMAP *uniq = tcmapnew2(len); + for(int j = 1; j <= len; j++){ + lua_rawgeti(lua, i, j); +@@ -2162,7 +2162,7 @@ static int serv_isect(lua_State *lua){ + static int serv_union(lua_State *lua){ + int argc = lua_gettop(lua); + if(argc == 1 && lua_type(lua, 1) == LUA_TTABLE){ +- int len = lua_objlen(lua, 1); ++ int len = lua_rawlen(lua, 1); + for(int i = 1; i <= len; i++){ + lua_rawgeti(lua, 1, i); + if(lua_type(lua, -1) == LUA_TTABLE){ +@@ -2180,12 +2180,12 @@ static int serv_union(lua_State *lua){ + int rnum = 0; + for(int i = 1; i <= argc; i++){ + if(lua_type(lua, i) != LUA_TTABLE) continue; +- rnum += lua_objlen(lua, i); ++ rnum += lua_rawlen(lua, i); + } + TCMAP *result = tcmapnew2(rnum); + for(int i = 1; i <= argc; i++){ + if(lua_type(lua, i) != LUA_TTABLE) continue; +- int len = lua_objlen(lua, i); ++ int len = lua_rawlen(lua, i); + for(int j = 1; j <= len; j++){ + lua_rawgeti(lua, i, j); + size_t size; |