diff options
Diffstat (limited to 'src/lib_bit.c')
-rw-r--r-- | src/lib_bit.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/lib_bit.c b/src/lib_bit.c index c200404b..c6c5c6fe 100644 --- a/src/lib_bit.c +++ b/src/lib_bit.c | |||
@@ -21,7 +21,7 @@ | |||
21 | 21 | ||
22 | LJLIB_ASM(bit_tobit) LJLIB_REC(bit_unary IR_TOBIT) | 22 | LJLIB_ASM(bit_tobit) LJLIB_REC(bit_unary IR_TOBIT) |
23 | { | 23 | { |
24 | lj_lib_checknum(L, 1); | 24 | lj_lib_checknumber(L, 1); |
25 | return FFH_RETRY; | 25 | return FFH_RETRY; |
26 | } | 26 | } |
27 | LJLIB_ASM_(bit_bnot) LJLIB_REC(bit_unary IR_BNOT) | 27 | LJLIB_ASM_(bit_bnot) LJLIB_REC(bit_unary IR_BNOT) |
@@ -29,8 +29,8 @@ LJLIB_ASM_(bit_bswap) LJLIB_REC(bit_unary IR_BSWAP) | |||
29 | 29 | ||
30 | LJLIB_ASM(bit_lshift) LJLIB_REC(bit_shift IR_BSHL) | 30 | LJLIB_ASM(bit_lshift) LJLIB_REC(bit_shift IR_BSHL) |
31 | { | 31 | { |
32 | lj_lib_checknum(L, 1); | 32 | lj_lib_checknumber(L, 1); |
33 | lj_lib_checknum(L, 2); | 33 | lj_lib_checkbit(L, 2); |
34 | return FFH_RETRY; | 34 | return FFH_RETRY; |
35 | } | 35 | } |
36 | LJLIB_ASM_(bit_rshift) LJLIB_REC(bit_shift IR_BSHR) | 36 | LJLIB_ASM_(bit_rshift) LJLIB_REC(bit_shift IR_BSHR) |
@@ -41,7 +41,7 @@ LJLIB_ASM_(bit_ror) LJLIB_REC(bit_shift IR_BROR) | |||
41 | LJLIB_ASM(bit_band) LJLIB_REC(bit_nary IR_BAND) | 41 | LJLIB_ASM(bit_band) LJLIB_REC(bit_nary IR_BAND) |
42 | { | 42 | { |
43 | int i = 0; | 43 | int i = 0; |
44 | do { lj_lib_checknum(L, ++i); } while (L->base+i < L->top); | 44 | do { lj_lib_checknumber(L, ++i); } while (L->base+i < L->top); |
45 | return FFH_RETRY; | 45 | return FFH_RETRY; |
46 | } | 46 | } |
47 | LJLIB_ASM_(bit_bor) LJLIB_REC(bit_nary IR_BOR) | 47 | LJLIB_ASM_(bit_bor) LJLIB_REC(bit_nary IR_BOR) |
@@ -51,8 +51,8 @@ LJLIB_ASM_(bit_bxor) LJLIB_REC(bit_nary IR_BXOR) | |||
51 | 51 | ||
52 | LJLIB_CF(bit_tohex) | 52 | LJLIB_CF(bit_tohex) |
53 | { | 53 | { |
54 | uint32_t b = (uint32_t)lj_num2bit(lj_lib_checknum(L, 1)); | 54 | uint32_t b = (uint32_t)lj_lib_checkbit(L, 1); |
55 | int32_t i, n = L->base+1 >= L->top ? 8 : lj_num2bit(lj_lib_checknum(L, 2)); | 55 | int32_t i, n = L->base+1 >= L->top ? 8 : lj_lib_checkbit(L, 2); |
56 | const char *hexdigits = "0123456789abcdef"; | 56 | const char *hexdigits = "0123456789abcdef"; |
57 | char buf[8]; | 57 | char buf[8]; |
58 | if (n < 0) { n = -n; hexdigits = "0123456789ABCDEF"; } | 58 | if (n < 0) { n = -n; hexdigits = "0123456789ABCDEF"; } |