rusefi
/
lua
mirror of https://github.com/rusefi/lua.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

patch for last bug corrected to be against last released version 

(and not against last version in RCS...)
This commit is contained in:
Roberto Ierusalimschy 2015-04-13 13:13:25 -03:00
parent 69b5f7a410
commit 513c639bf9
1 changed files with 15 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
bugs
View File

@ -3392,20 +3392,19 @@ print(co()) --> true (should be false)
]],
patch = [[
--- lstate.h 2015/03/04 13:31:21 2.120
+++ lstate.h 2015/04/08 16:30:40
--- lstate.h 2014/10/30 18:53:28 2.119
+++ lstate.h 2015/04/13 15:58:40
@@ -94,6 +94,7 @@
#define CIST_YPCALL (1<<4) /* call is a yieldable protected call */
#define CIST_TAIL (1<<5) /* call was tail called */
#define CIST_HOOKYIELD (1<<6) /* last hook called yielded */
+#define CIST_LEQ (1<<7) /* using __lt for __le */
#define isLua(ci) ((ci)->callstatus & CIST_LUA)
--- lvm.c 2015/03/30 15:45:01 2.238
+++ lvm.c 2015/04/09 15:30:13
@@ -275,9 +275,14 @@
#define CIST_YPCALL (1<<4) /* call is a yieldable protected call */
#define CIST_TAIL (1<<5) /* call was tail called */
#define CIST_HOOKYIELD (1<<6) /* last hook called yielded */
+#define CIST_LEQ (1<<7) /* using __lt for __le */
#define isLua(ci) ((ci)->callstatus & CIST_LUA)
--- lvm.c 2014/12/27 20:30:38 2.232
+++ lvm.c 2015/04/13 15:51:30
@@ -292,9 +292,14 @@
return l_strcmp(tsvalue(l), tsvalue(r)) <= 0;
else if ((res = luaT_callorderTM(L, l, r, TM_LE)) >= 0) /* first try 'le' */
return res;
@ -3421,8 +3420,9 @@ patch = [[
+ return !res; /* result is negated */
+ }
}
@@ -542,11 +547,11 @@
@@ -553,11 +558,11 @@
case OP_LE: case OP_LT: case OP_EQ: {
int res = !l_isfalse(L->top - 1);
L->top--;