| /* |
| |
| ** $Id: lubit.c,v 1.00 2011/10/30 17:17:17 jano Exp $ |
| |
| ** Code generator for Lua |
| |
| ** See Copyright Notice in lua.h |
| |
| */ |
| |
| |
| |
| #ifndef lubit_h |
| |
| #define lubit_h |
| |
| |
| |
| |
| |
| #include "llimits.h" |
| |
| #include "lua.h" |
| |
| |
| |
| #ifdef GCW_BIT |
| |
| /* |
| |
| #define bit_and(L,a,b) (a&b) |
| |
| #define bit_or(L,a,b) (a|b) |
| |
| #define bit_xor(L,a,b) (a^b) |
| |
| #define bit_lshift(L,a,b) (a<<b) |
| |
| #define bit_rshift(L,a,b) sysrshift(a,b) |
| |
| #define bit_not(L,a) (~a) |
| |
| */ |
| |
| LUAI_FUNC lua_Number bit_and (lua_State *L, lua_Number v1, lua_Number v2); |
| |
| LUAI_FUNC lua_Number bit_or (lua_State *L, lua_Number v1, lua_Number v2); |
| |
| LUAI_FUNC lua_Number bit_xor (lua_State *L, lua_Number v1, lua_Number v2); |
| |
| LUAI_FUNC lua_Number bit_xor (lua_State *L, lua_Number v1, lua_Number v2); |
| |
| LUAI_FUNC lua_Number bit_lshift (lua_State *L, lua_Number v1, lua_Number v2); |
| |
| LUAI_FUNC lua_Number bit_rshift (lua_State *L, lua_Number v1, lua_Number v2); |
| |
| LUAI_FUNC lua_Number bit_not (lua_State *L, lua_Number v1); |
| |
| |
| |
| LUAI_FUNC lua_Number log_and (lua_State *L, lua_Number v1, lua_Number v2); |
| |
| LUAI_FUNC lua_Number log_or (lua_State *L, lua_Number v1, lua_Number v2); |
| |
| LUAI_FUNC lua_Number log_not (lua_State *L, lua_Number v1); |
| |
| #endif |
| |
| |
| |
| #endif |
| |
| |
| |