diff options
Diffstat (limited to 'lapi.c')
-rw-r--r-- | lapi.c | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lapi.c,v 2.147 2011/05/31 18:27:56 roberto Exp roberto $ | 2 | ** $Id: lapi.c,v 2.148 2011/06/02 19:31:40 roberto Exp roberto $ |
3 | ** Lua API | 3 | ** Lua API |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -463,6 +463,8 @@ LUA_API void lua_pushnil (lua_State *L) { | |||
463 | LUA_API void lua_pushnumber (lua_State *L, lua_Number n) { | 463 | LUA_API void lua_pushnumber (lua_State *L, lua_Number n) { |
464 | lua_lock(L); | 464 | lua_lock(L); |
465 | setnvalue(L->top, n); | 465 | setnvalue(L->top, n); |
466 | luai_checknum(L, L->top, | ||
467 | luaG_runerror(L, "C API - attempt to push a signaling NaN")); | ||
466 | api_incr_top(L); | 468 | api_incr_top(L); |
467 | lua_unlock(L); | 469 | lua_unlock(L); |
468 | } | 470 | } |