diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-08-10 16:50:47 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-08-10 16:50:47 -0300 |
| commit | daf09c476fe375d8a9a47bc1294a1cd430290226 (patch) | |
| tree | 1d4ecc2d4001f2195168eaeafb257c9af8b94793 /ldo.c | |
| parent | e238efc5367a8d88757dd84df0683e1d8d9f9211 (diff) | |
| download | lua-daf09c476fe375d8a9a47bc1294a1cd430290226.tar.gz lua-daf09c476fe375d8a9a47bc1294a1cd430290226.tar.bz2 lua-daf09c476fe375d8a9a47bc1294a1cd430290226.zip | |
still better error messages
Diffstat (limited to 'ldo.c')
| -rw-r--r-- | ldo.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldo.c,v 1.83 2000/08/08 20:42:07 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 1.84 2000/08/09 19:16:57 roberto Exp roberto $ |
| 3 | ** Stack and Call structure of Lua | 3 | ** Stack and Call structure of Lua |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -202,7 +202,7 @@ void luaD_call (lua_State *L, StkId func, int nResults) { | |||
| 202 | default: { /* `func' is not a function; check the `function' tag method */ | 202 | default: { /* `func' is not a function; check the `function' tag method */ |
| 203 | const TObject *im = luaT_getimbyObj(L, func, IM_FUNCTION); | 203 | const TObject *im = luaT_getimbyObj(L, func, IM_FUNCTION); |
| 204 | if (ttype(im) == TAG_NIL) | 204 | if (ttype(im) == TAG_NIL) |
| 205 | luaG_callerror(L, func); | 205 | luaG_typeerror(L, func, "call"); |
| 206 | luaD_openstack(L, func); | 206 | luaD_openstack(L, func); |
| 207 | *func = *im; /* tag method is the new function to be called */ | 207 | *func = *im; /* tag method is the new function to be called */ |
| 208 | goto retry; /* retry the call */ | 208 | goto retry; /* retry the call */ |