diff options
author | Bardur Arantsson <bardur@scientician.net> | 2011-02-19 17:09:03 +0100 |
---|---|---|
committer | Bardur Arantsson <bardur@scientician.net> | 2011-02-19 19:32:06 +0100 |
commit | 946d101429a49b656ee37ad00a927787e2d463fd (patch) | |
tree | 99623edd7ad64502efbdefcc2ad1eaf693a062b2 /src/script.c | |
parent | 6a077f767bab67c5847e6ccf98513151462879a4 (diff) |
Remove dead (#if 0) code.
Diffstat (limited to 'src/script.c')
-rw-r--r-- | src/script.c | 39 |
1 files changed, 0 insertions, 39 deletions
diff --git a/src/script.c b/src/script.c index 44bb935a..4070e666 100644 --- a/src/script.c +++ b/src/script.c @@ -70,45 +70,6 @@ static struct luaL_reg tome_iolib[] = #define luaL_check_bit(L, n) ((long)luaL_check_number(L, n)) #define luaL_check_ubit(L, n) ((unsigned long)luaL_check_bit(L, n)) -#if 0 - -/* - * Nuked because they can confuse some compilers (lcc for example), - * and because of their obscurity -- pelpel - */ - -#define TDYADIC(name, op, t1, t2) \ -static int int_ ## name(lua_State* L) { \ -lua_pushnumber(L, \ -luaL_check_ ## t1 ## bit(L, 1) op luaL_check_ ## t2 ## bit(L, 2)); \ -return 1; \ -} - -#define DYADIC(name, op) \ -static int int_ ## name(lua_State* L) { \ -lua_pushnumber(L, \ -luaL_check_bit(L, 1) op luaL_check_bit(L, 2)); \ -return 1; \ -} - -#define MONADIC(name, op) \ -static int int_ ## name(lua_State* L) { \ -lua_pushnumber(L, op luaL_check_bit(L, 1)); \ -return 1; \ -} - -#define VARIADIC(name, op) \ -static int int_ ## name(lua_State *L) { \ -int n = lua_gettop(L), i; \ -long w = luaL_check_bit(L, 1); \ -for (i = 2; i <= n; i++) \ -w op ## = luaL_check_bit(L, i); \ -lua_pushnumber(L, w); \ -return 1; \ -} - -#endif - /* * Monadic bit negation operation |