Ticket #49481: cardpeek-lua5.3.patch

sysutils/cardpeek/Portfile

@@ -1 +1 @@
 # -*- coding: utf-8; mode: tcl; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- vim:fenc=utf-8:ft=tcl:et:sw=4:ts=4:sts=4
-# $Id: Portfile 140065 2015-09-08 11:06:08Z ryandesign@macports.org $
+# $Id: Portfile 139229 2015-08-08 03:10:35Z jeremyhu@macports.org $
 
 PortSystem 1.0
 
@@ -24 +24 @@
 checksums       rmd160 0d1118586f85512d4483d6be027921ecc222c1f8 \
                 sha256 9c78dfdf84493c551b49447e4bb46c8d7b33f0785b93893222b70b6115013a85
 
+patchfiles      patch-lua_bytes.c.diff
+
 depends_build   port:pkgconfig
 
 depends_lib     port:gtk3 path:lib/pkgconfig/glib-2.0.pc:glib2 port:lua port:libiconv port:curl path:lib/libssl.dylib:openssl

sysutils/cardpeek/files/patch-lua_bytes.c.diff

@@ +1 @@
+--- lua_bytes.c.orig    2015-11-04 00:33:40.000000000 +0100
++++ lua_bytes.c 2015-11-04 00:32:44.000000000 +0100
+@@ -116,7 +116,7 @@
+ 
+ static int subr_bytes_new(lua_State *L) 
+ {
+-  int width = luaL_checkint(L, 1);
++  int width = luaL_checkinteger(L, 1);
+   int n = lua_gettop(L);
+   bytestring_t *bs;
+ 
+@@ -259,7 +259,7 @@
+        b_index = 0;
+   else
+   {
+-       b_index=luaL_checkint(L,2);
++       b_index=luaL_checkinteger(L,2);
+        if (b_index<0) b_index = 0;
+   }
+ 
+@@ -267,7 +267,7 @@
+        e_index = b_index;
+   else
+   {
+-       e_index=luaL_checkint(L,2);
++       e_index=luaL_checkinteger(L,2);
+        if (e_index>=(int)bytestring_get_size(bs)) e_index = bytestring_get_size(bs)-1;
+   }
+ 
+@@ -293,13 +293,13 @@
+   unsigned i;
+   unsigned char c;
+ 
+-  b_index=(unsigned)luaL_checkint(L,2);
++  b_index=(unsigned)luaL_checkinteger(L,2);
+ 
+   e_index = b_index + lua_gettop(L)-3;
+ 
+   for (i=b_index;i<=e_index;i++)
+   {
+-         c = (unsigned char)luaL_checkint(L,i-b_index+3);
++         c = (unsigned char)luaL_checkinteger(L,i-b_index+3);
+          if (i<bytestring_get_size(bs))
+          {
+                  bytestring_set_element(bs,i,c);
+@@ -324,8 +324,8 @@
+ static int subr_bytes_pad_left(lua_State *L)
+ {
+   bytestring_t *bs = bytestring_duplicate(luaL_check_bytestring(L, 1));
+-  unsigned pad_length = luaL_checkint(L,2);
+-  unsigned pad_value =  luaL_checkint(L,3);
++  unsigned pad_length = luaL_checkinteger(L,2);
++  unsigned pad_value =  luaL_checkinteger(L,3);
+   if (bytestring_pad_left(bs,pad_length,pad_value)!=BYTESTRING_OK)
+   {
+        bytestring_free(bs);
+@@ -340,8 +340,8 @@
+ static int subr_bytes_pad_right(lua_State *L)
+ {
+   bytestring_t *bs = bytestring_duplicate(luaL_check_bytestring(L, 1));
+-  unsigned pad_length = luaL_checkint(L,2);
+-  unsigned pad_value =  luaL_checkint(L,3);
++  unsigned pad_length = luaL_checkinteger(L,2);
++  unsigned pad_value =  luaL_checkinteger(L,3);
+   if (bytestring_pad_right(bs,pad_length,pad_value)!=BYTESTRING_OK)
+   {
+        bytestring_free(bs);
+@@ -376,12 +376,12 @@
+ static int subr_bytes_sub(lua_State *L)
+ {
+   bytestring_t *bs = luaL_check_bytestring(L, 1);
+-  int start=luaL_checkint(L,2);
++  int start=luaL_checkinteger(L,2);
+   int end=-1;
+   bytestring_t *ret;
+ 
+   if (lua_gettop(L)>2)
+-    end=luaL_checkint(L,3);
++    end=luaL_checkinteger(L,3);
+   if (start<0)
+     start=bytestring_get_size(bs)+start;
+   if (end<0)
+@@ -431,13 +431,13 @@
+                                  "\tchange bytes.convert(A,B) to bytes.convert(B,A)\n"
+                                  "\tThis warning will only appear once.");
+       }
+-      width=luaL_checkint(L,1);
++      width=luaL_checkinteger(L,1);
+       bs = luaL_check_bytestring(L, 2);
+   } 
+   else
+   {
+       bs = luaL_check_bytestring(L, 1);
+-      width=luaL_checkint(L,2);
++      width=luaL_checkinteger(L,2);
+   }
+ 
+   if (width!=8 && width!=4 && width!=1)