lua

A copy of the Lua development repository
Log | Files | Refs | README

commit 513c639bf91cbf7bcd11b37582a7adb897970b8d
parent 69b5f7a410fab2a8a661e609a7286aea511479bb
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Mon, 13 Apr 2015 13:13:00 -0300

patch for last bug corrected to be against last released version
(and not against last version in RCS...)

Diffstat:
Mbugs | 30+++++++++++++++---------------
1 file changed, 15 insertions(+), 15 deletions(-)

diff --git a/bugs b/bugs @@ -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--;