diff options
Diffstat (limited to 'src/host/genminilua.lua')
| -rw-r--r-- | src/host/genminilua.lua | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/host/genminilua.lua b/src/host/genminilua.lua index 2b0008ac..9e129148 100644 --- a/src/host/genminilua.lua +++ b/src/host/genminilua.lua | |||
| @@ -90,11 +90,11 @@ static int bswap(lua_State *L){ | |||
| 90 | UB b=barg(L,1);b=(b>>24)|((b>>8)&0xff00)|((b&0xff00)<<8)|(b<<24);BRET(b)} | 90 | UB b=barg(L,1);b=(b>>24)|((b>>8)&0xff00)|((b&0xff00)<<8)|(b<<24);BRET(b)} |
| 91 | static int tohex(lua_State *L){ | 91 | static int tohex(lua_State *L){ |
| 92 | UB b=barg(L,1); | 92 | UB b=barg(L,1); |
| 93 | int n=lua_isnone(L,2)?8:(int)barg(L,2); | 93 | UB n=lua_isnone(L,2)?8:barg(L,2); |
| 94 | const char *hexdigits="0123456789abcdef"; | 94 | const char *hexdigits="0123456789abcdef"; |
| 95 | char buf[8]; | 95 | char buf[8]; |
| 96 | int i; | 96 | int i; |
| 97 | if(n<0){n=-n;hexdigits="0123456789ABCDEF";} | 97 | if((int)n<0){n=~n+1;hexdigits="0123456789ABCDEF";} |
| 98 | if(n>8)n=8; | 98 | if(n>8)n=8; |
| 99 | for(i=(int)n;--i>=0;){buf[i]=hexdigits[b&15];b>>=4;} | 99 | for(i=(int)n;--i>=0;){buf[i]=hexdigits[b&15];b>>=4;} |
| 100 | lua_pushlstring(L,buf,(size_t)n); | 100 | lua_pushlstring(L,buf,(size_t)n); |
