diff options
| -rw-r--r-- | lbitlib.c | 5 |
1 files changed, 3 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lbitlib.c,v 1.18 2013/03/19 13:19:12 roberto Exp $ | 2 | ** $Id: lbitlib.c,v 1.18.1.1 2013/04/12 18:48:47 roberto Exp roberto $ |
| 3 | ** Standard library for bitwise operations | 3 | ** Standard library for bitwise operations |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -129,7 +129,8 @@ static int b_rot (lua_State *L, int i) { | |||
| 129 | b_uint r = luaL_checkunsigned(L, 1); | 129 | b_uint r = luaL_checkunsigned(L, 1); |
| 130 | i &= (LUA_NBITS - 1); /* i = i % NBITS */ | 130 | i &= (LUA_NBITS - 1); /* i = i % NBITS */ |
| 131 | r = trim(r); | 131 | r = trim(r); |
| 132 | r = (r << i) | (r >> (LUA_NBITS - i)); | 132 | if (i != 0) /* avoid undefined shift of LUA_NBITS when i == 0 */ |
| 133 | r = (r << i) | (r >> (LUA_NBITS - i)); | ||
| 133 | lua_pushunsigned(L, trim(r)); | 134 | lua_pushunsigned(L, trim(r)); |
| 134 | return 1; | 135 | return 1; |
| 135 | } | 136 | } |
