aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-12-29 14:24:03 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-12-29 14:24:03 -0200
commit4fbe775154ff281bf9c04cf92d68824a82593402 (patch)
tree1333d8526bc4d404af5939cf3d9bc6a6f5bb75a9
parentaabefe9d68be29c81e7afe00bf00c5bfbf243dc5 (diff)
downloadlua-4fbe775154ff281bf9c04cf92d68824a82593402.tar.gz
lua-4fbe775154ff281bf9c04cf92d68824a82593402.tar.bz2
lua-4fbe775154ff281bf9c04cf92d68824a82593402.zip
details
-rw-r--r--lauxlib.h65
1 files changed, 37 insertions, 28 deletions
diff --git a/lauxlib.h b/lauxlib.h
index c47d488a..0e88efc2 100644
--- a/lauxlib.h
+++ b/lauxlib.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lauxlib.h,v 1.15 1999/11/22 17:39:51 roberto Exp roberto $ 2** $Id: lauxlib.h,v 1.16 1999/12/03 11:26:23 roberto Exp roberto $
3** Auxiliary functions for building Lua libraries 3** Auxiliary functions for building Lua libraries
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -18,8 +18,37 @@ struct luaL_reg {
18}; 18};
19 19
20 20
21void luaL_openlib (lua_State *L, const struct luaL_reg *l, int n);
22void luaL_argerror (lua_State *L, int numarg, const char *extramsg);
23const char *luaL_check_lstr (lua_State *L, int numArg, long *len);
24const char *luaL_opt_lstr (lua_State *L, int numArg, const char *def, long *len);
25double luaL_check_number (lua_State *L, int numArg);
26double luaL_opt_number (lua_State *L, int numArg, double def);
27lua_Object luaL_functionarg (lua_State *L, int arg);
28lua_Object luaL_tablearg (lua_State *L, int arg);
29lua_Object luaL_nonnullarg (lua_State *L, int numArg);
30void luaL_verror (lua_State *L, const char *fmt, ...);
31char *luaL_openspace (lua_State *L, int size);
32void luaL_resetbuffer (lua_State *L);
33void luaL_addchar (lua_State *L, int c);
34int luaL_getsize (lua_State *L);
35void luaL_addsize (lua_State *L, int n);
36int luaL_newbuffer (lua_State *L, int size);
37void luaL_oldbuffer (lua_State *L, int old);
38char *luaL_buffer (lua_State *L);
39int luaL_findstring (const char *name, const char *const list[]);
40void luaL_chunkid (char *out, const char *source, int len);
41void luaL_filesource (char *out, const char *filename, int len);
42
43
21#ifdef LUA_REENTRANT 44#ifdef LUA_REENTRANT
22 45
46/*
47** ===============================================================
48** some useful macros
49** ===============================================================
50*/
51
23#define luaL_arg_check(L, cond,numarg,extramsg) if (!(cond)) \ 52#define luaL_arg_check(L, cond,numarg,extramsg) if (!(cond)) \
24 luaL_argerror(L, numarg,extramsg) 53 luaL_argerror(L, numarg,extramsg)
25#define luaL_check_string(L,n) (luaL_check_lstr(L, (n), NULL)) 54#define luaL_check_string(L,n) (luaL_check_lstr(L, (n), NULL))
@@ -32,6 +61,13 @@ struct luaL_reg {
32 61
33#else 62#else
34 63
64
65/*
66** ===============================================================
67** Macros for single-state use
68** ===============================================================
69*/
70
35#define luaL_arg_check(cond,numarg,extramsg) if (!(cond)) \ 71#define luaL_arg_check(cond,numarg,extramsg) if (!(cond)) \
36 luaL_argerror(numarg,extramsg) 72 luaL_argerror(numarg,extramsg)
37#define luaL_check_string(n) (luaL_check_lstr((n), NULL)) 73#define luaL_check_string(n) (luaL_check_lstr((n), NULL))
@@ -42,33 +78,6 @@ struct luaL_reg {
42#define luaL_opt_long(n,d) ((long)luaL_opt_number(n,d)) 78#define luaL_opt_long(n,d) ((long)luaL_opt_number(n,d))
43#define luaL_openl(a) luaL_openlib(a, (sizeof(a)/sizeof(a[0]))) 79#define luaL_openl(a) luaL_openlib(a, (sizeof(a)/sizeof(a[0])))
44 80
45#endif
46
47
48void luaL_openlib (lua_State *L, const struct luaL_reg *l, int n);
49void luaL_argerror (lua_State *L, int numarg, const char *extramsg);
50const char *luaL_check_lstr (lua_State *L, int numArg, long *len);
51const char *luaL_opt_lstr (lua_State *L, int numArg, const char *def, long *len);
52double luaL_check_number (lua_State *L, int numArg);
53double luaL_opt_number (lua_State *L, int numArg, double def);
54lua_Object luaL_functionarg (lua_State *L, int arg);
55lua_Object luaL_tablearg (lua_State *L, int arg);
56lua_Object luaL_nonnullarg (lua_State *L, int numArg);
57void luaL_verror (lua_State *L, const char *fmt, ...);
58char *luaL_openspace (lua_State *L, int size);
59void luaL_resetbuffer (lua_State *L);
60void luaL_addchar (lua_State *L, int c);
61int luaL_getsize (lua_State *L);
62void luaL_addsize (lua_State *L, int n);
63int luaL_newbuffer (lua_State *L, int size);
64void luaL_oldbuffer (lua_State *L, int old);
65char *luaL_buffer (lua_State *L);
66int luaL_findstring (const char *name, const char *const list[]);
67void luaL_chunkid (char *out, const char *source, int len);
68void luaL_filesource (char *out, const char *filename, int len);
69
70
71#ifndef LUA_REENTRANT
72 81
73#define luaL_openlib(l,n) (luaL_openlib)(lua_state,l,n) 82#define luaL_openlib(l,n) (luaL_openlib)(lua_state,l,n)
74#define luaL_argerror(numarg,extramsg) \ 83#define luaL_argerror(numarg,extramsg) \