From 2170b9fdde5db0da6dde86a494cc2bc909c5682b Mon Sep 17 00:00:00 2001 From: jyelon Date: Sat, 21 Feb 2026 03:16:48 -0500 Subject: [PATCH] Add tokens to the standard less-than comparison operator --- luprex/ext/eris-master/src/lvm.c | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/luprex/ext/eris-master/src/lvm.c b/luprex/ext/eris-master/src/lvm.c index 5dcd3c54..33bea07d 100644 --- a/luprex/ext/eris-master/src/lvm.c +++ b/luprex/ext/eris-master/src/lvm.c @@ -228,6 +228,8 @@ int luaV_lessthan (lua_State *L, const TValue *l, const TValue *r) { return luai_numlt(L, nvalue(l), nvalue(r)); else if (ttisstring(l) && ttisstring(r)) return l_strcmp(rawtsvalue(l), rawtsvalue(r)) < 0; + else if (ttislightuserdata(l) && ttislightuserdata(r)) + return pvalue(l) < pvalue(r); else if ((res = call_orderTM(L, l, r, TM_LT)) < 0) luaG_ordererror(L, l, r); return res; @@ -240,6 +242,8 @@ int luaV_lessequal (lua_State *L, const TValue *l, const TValue *r) { return luai_numle(L, nvalue(l), nvalue(r)); else if (ttisstring(l) && ttisstring(r)) return l_strcmp(rawtsvalue(l), rawtsvalue(r)) <= 0; + else if (ttislightuserdata(l) && ttislightuserdata(r)) + return pvalue(l) <= pvalue(r); else if ((res = call_orderTM(L, l, r, TM_LE)) >= 0) /* first try `le' */ return res; else if ((res = call_orderTM(L, r, l, TM_LT)) < 0) /* else try `lt' */