From d73c5bcfe79459efafb4d4ede67ece8df9f6ef16 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Mon, 14 Apr 1997 12:30:03 -0300 Subject: function name is only needed *if* there is an error. --- auxlib.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'auxlib.c') diff --git a/auxlib.c b/auxlib.c index 1c967c71..276fb5f1 100644 --- a/auxlib.c +++ b/auxlib.c @@ -1,4 +1,4 @@ -char *rcs_auxlib="$Id: auxlib.c,v 1.3 1997/04/06 14:08:08 roberto Exp roberto $"; +char *rcs_auxlib="$Id: auxlib.c,v 1.4 1997/04/07 14:48:53 roberto Exp roberto $"; #include #include @@ -22,11 +22,11 @@ int luaI_findstring (char *name, char *list[]) void luaL_arg_check(int cond, int numarg, char *extramsg) { - char *funcname; - lua_getobjname(lua_stackedfunction(0), &funcname); - if (funcname == NULL) - funcname = "???"; if (!cond) { + char *funcname; + lua_getobjname(lua_stackedfunction(0), &funcname); + if (funcname == NULL) + funcname = "???"; if (extramsg == NULL) luaL_verror("bad argument #%d to function `%s'", numarg, funcname); else -- cgit v1.2.3-55-g6feb