diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2002-06-06 09:40:36 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2002-06-06 09:40:36 -0300 |
| commit | 630acb204869f367e31a57d850b3669f49430064 (patch) | |
| tree | 61e89fb1b1849026cec3b6b318fe330700d50623 | |
| parent | 16f4723398c0e4c21d9a94539022ac1a4358b5f2 (diff) | |
| download | lua-630acb204869f367e31a57d850b3669f49430064.tar.gz lua-630acb204869f367e31a57d850b3669f49430064.tar.bz2 lua-630acb204869f367e31a57d850b3669f49430064.zip | |
_ERRORMESSAGE `accepts' non-string arguments (at least for now...)
| -rw-r--r-- | ldblib.c | 5 |
1 files changed, 3 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldblib.c,v 1.54 2002/06/03 17:47:18 roberto Exp roberto $ | 2 | ** $Id: ldblib.c,v 1.55 2002/06/05 17:24:04 roberto Exp roberto $ |
| 3 | ** Interface from Lua to its debug API | 3 | ** Interface from Lua to its debug API |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -185,7 +185,8 @@ static int errorfb (lua_State *L) { | |||
| 185 | int level = 1; /* skip level 0 (it's this function) */ | 185 | int level = 1; /* skip level 0 (it's this function) */ |
| 186 | int firstpart = 1; /* still before eventual `...' */ | 186 | int firstpart = 1; /* still before eventual `...' */ |
| 187 | lua_Debug ar; | 187 | lua_Debug ar; |
| 188 | luaL_check_string(L, 1); | 188 | if (!lua_isstring(L, 1)) |
| 189 | return lua_gettop(L); | ||
| 189 | lua_settop(L, 1); | 190 | lua_settop(L, 1); |
| 190 | lua_pushliteral(L, "\n"); | 191 | lua_pushliteral(L, "\n"); |
| 191 | lua_pushliteral(L, "stack traceback:\n"); | 192 | lua_pushliteral(L, "stack traceback:\n"); |
