aboutsummaryrefslogtreecommitdiff
path: root/ltm.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1998-08-21 14:43:44 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1998-08-21 14:43:44 -0300
commitcc117253c83ec32d226a8f2226d5ca144804f873 (patch)
tree46551b01d3febf98d65d55276d5831a75e2e0062 /ltm.c
parent8e226e6a09390a80fde98f192833fc85a5537376 (diff)
downloadlua-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.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/ltm.c b/ltm.c
index cc290dde..94e3d041 100644
--- a/ltm.c
+++ b/ltm.c
@@ -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)
158char *luaT_travtagmethods (int (*fn)(TObject *)) 158char *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--)