48   lua_Number n;  member
62   bn.n = lua_tonumber(L, idx);  in barg()
64   bn.n = luaL_checknumber(L, idx);  in barg()
67   bn.n += 6755399441055744.0;  /* 2^52+2^51 */  in barg()
79     b = (UBits)(SBits)bn.n;  in barg()
106 #define bshl(b, n)  (b << n)  argument
107 #define bshr(b, n)  (b >> n)  argument
108 #define bsar(b, n)  ((SBits)b >> n)  argument
109 #define brol(b, n)  ((b << n) | (b >> (32-n)))  argument
110 #define bror(b, n)  ((b << (32-n)) | (b >> n))  argument
113     UBits b = barg(L, 1); UBits n = barg(L, 2) & 31; BRET(fn(b, n)) }
130   SBits n = lua_isnone(L, 2) ? 8 : (SBits)barg(L, 2);  in bit_tohex()  local
134   if (n < 0) { n = -n; hexdigits = "0123456789ABCDEF"; }  in bit_tohex()
135   if (n > 8) n = 8;  in bit_tohex()
136   for (i = (int)n; --i >= 0; ) { buf[i] = hexdigits[b & 15]; b >>= 4; }  in bit_tohex()
137   lua_pushlstring(L, buf, (size_t)n);  in bit_tohex()