|
@@ -0,0 +1,20 @@
|
|
|
+--- lua-5.1.4.orig/src/lstrlib.c 2008/07/11 17:27:21 1.132.1.4
|
|
|
++++ lua-5.1.4/src/lstrlib.c 2010/05/14 15:12:53
|
|
|
+@@ -754,6 +754,7 @@
|
|
|
+
|
|
|
+
|
|
|
+ static int str_format (lua_State *L) {
|
|
|
++ int top = lua_gettop(L);
|
|
|
+ int arg = 1;
|
|
|
+ size_t sfl;
|
|
|
+ const char *strfrmt = luaL_checklstring(L, arg, &sfl);
|
|
|
+@@ -768,7 +769,8 @@
|
|
|
+ else { /* format item */
|
|
|
+ char form[MAX_FORMAT]; /* to store the format (`%...') */
|
|
|
+ char buff[MAX_ITEM]; /* to store the formatted item */
|
|
|
+- arg++;
|
|
|
++ if (++arg > top)
|
|
|
++ luaL_argerror(L, arg, "no value");
|
|
|
+ strfrmt = scanformat(L, strfrmt, form);
|
|
|
+ switch (*strfrmt++) {
|
|
|
+ case 'c': {
|