From 80b3d28f4a9e518bf40b35f786199919180bfcd4 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Tue, 9 Dec 1997 11:50:08 -0200 Subject: details (mainly error messages) --- lauxlib.c | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) (limited to 'lauxlib.c') diff --git a/lauxlib.c b/lauxlib.c index 85bb04ac..ed893f70 100644 --- a/lauxlib.c +++ b/lauxlib.c @@ -1,5 +1,5 @@ /* -** $Id: lauxlib.c,v 1.3 1997/11/04 15:27:53 roberto Exp roberto $ +** $Id: lauxlib.c,v 1.4 1997/11/21 19:00:46 roberto Exp roberto $ ** Auxiliar functions for building Lua libraries ** See Copyright Notice in lua.h */ @@ -55,6 +55,21 @@ double luaL_opt_number (int numArg, double def) { return (lua_getparam(numArg) == LUA_NOOBJECT) ? def : luaL_check_number(numArg); +} + + +lua_Object luaL_tablearg (int arg) +{ + lua_Object o = lua_getparam(arg); + luaL_arg_check(lua_istable(o), arg, "table expected"); + return o; +} + +lua_Object luaL_functionarg (int arg) +{ + lua_Object o = lua_getparam(arg); + luaL_arg_check(lua_isfunction(o), arg, "function expected"); + return o; } lua_Object luaL_nonnullarg (int numArg) -- cgit v1.2.3-55-g6feb