summaryrefslogtreecommitdiff
path: root/source/luametatex/source/luacore/lua54/src/lobject.c
diff options
context:
space:
mode:
Diffstat (limited to 'source/luametatex/source/luacore/lua54/src/lobject.c')
-rw-r--r--source/luametatex/source/luacore/lua54/src/lobject.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/source/luametatex/source/luacore/lua54/src/lobject.c b/source/luametatex/source/luacore/lua54/src/lobject.c
index a2c006098..03e2798ca 100644
--- a/source/luametatex/source/luacore/lua54/src/lobject.c
+++ b/source/luametatex/source/luacore/lua54/src/lobject.c
@@ -62,7 +62,7 @@ static lua_Integer intarith (lua_State *L, int op, lua_Integer v1,
case LUA_OPBOR: return intop(|, v1, v2);
case LUA_OPBXOR: return intop(^, v1, v2);
case LUA_OPSHL: return luaV_shiftl(v1, v2);
- case LUA_OPSHR: return luaV_shiftl(v1, -v2);
+ case LUA_OPSHR: return luaV_shiftr(v1, v2);
case LUA_OPUNM: return intop(-, 0, v1);
case LUA_OPBNOT: return intop(^, ~l_castS2U(0), v1);
default: lua_assert(0); return 0;