diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1998-08-21 14:43:44 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1998-08-21 14:43:44 -0300 |
commit | cc117253c83ec32d226a8f2226d5ca144804f873 (patch) | |
tree | 46551b01d3febf98d65d55276d5831a75e2e0062 /ltm.c | |
parent | 8e226e6a09390a80fde98f192833fc85a5537376 (diff) | |
download | lua-cc117253c83ec32d226a8f2226d5ca144804f873.tar.gz lua-cc117253c83ec32d226a8f2226d5ca144804f873.tar.bz2 lua-cc117253c83ec32d226a8f2226d5ca144804f873.zip |
new implementation for error handling: on error, function _ERRORMESSAGE
is called, which in turn calls _ALERT to write a message to stderr.
Diffstat (limited to 'ltm.c')
-rw-r--r-- | ltm.c | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ltm.c,v 1.15 1998/03/11 13:59:50 roberto Exp roberto $ | 2 | ** $Id: ltm.c,v 1.16 1998/06/18 16:57:03 roberto Exp roberto $ |
3 | ** Tag methods | 3 | ** Tag methods |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -158,8 +158,6 @@ void luaT_settagmethod (int t, char *event, TObject *func) | |||
158 | char *luaT_travtagmethods (int (*fn)(TObject *)) | 158 | char *luaT_travtagmethods (int (*fn)(TObject *)) |
159 | { | 159 | { |
160 | int e; | 160 | int e; |
161 | if (fn(&L->errorim)) | ||
162 | return "error"; | ||
163 | for (e=IM_GETTABLE; e<=IM_FUNCTION; e++) { /* ORDER IM */ | 161 | for (e=IM_GETTABLE; e<=IM_FUNCTION; e++) { /* ORDER IM */ |
164 | int t; | 162 | int t; |
165 | for (t=0; t>=L->last_tag; t--) | 163 | for (t=0; t>=L->last_tag; t--) |