diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2018-03-09 16:24:45 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2018-03-09 16:24:45 -0300 |
| commit | 9e3db70482e927e5992cccdb5a40424b33ad0a29 (patch) | |
| tree | f1ef266d0fed005ff73723c6cfa607c041db7432 | |
| parent | dbec41f34ca26f4762bbda3c6e99ba227508d743 (diff) | |
| download | lua-9e3db70482e927e5992cccdb5a40424b33ad0a29.tar.gz lua-9e3db70482e927e5992cccdb5a40424b33ad0a29.tar.bz2 lua-9e3db70482e927e5992cccdb5a40424b33ad0a29.zip | |
details (casts between 'lua_Number' and 'double')
| -rw-r--r-- | ltests.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 2.241 2018/02/20 16:52:50 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.242 2018/02/23 13:13:31 roberto Exp roberto $ |
| 3 | ** Internal Module for Debugging of the Lua Implementation | 3 | ** Internal Module for Debugging of the Lua Implementation |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -957,13 +957,13 @@ static int doonnewstack (lua_State *L) { | |||
| 957 | 957 | ||
| 958 | 958 | ||
| 959 | static int s2d (lua_State *L) { | 959 | static int s2d (lua_State *L) { |
| 960 | lua_pushnumber(L, *cast(const double *, luaL_checkstring(L, 1))); | 960 | lua_pushnumber(L, cast_num(*cast(const double *, luaL_checkstring(L, 1)))); |
| 961 | return 1; | 961 | return 1; |
| 962 | } | 962 | } |
| 963 | 963 | ||
| 964 | 964 | ||
| 965 | static int d2s (lua_State *L) { | 965 | static int d2s (lua_State *L) { |
| 966 | double d = luaL_checknumber(L, 1); | 966 | double d = cast(double, luaL_checknumber(L, 1)); |
| 967 | lua_pushlstring(L, cast_charp(&d), sizeof(d)); | 967 | lua_pushlstring(L, cast_charp(&d), sizeof(d)); |
| 968 | return 1; | 968 | return 1; |
| 969 | } | 969 | } |
