aboutsummaryrefslogtreecommitdiff
path: root/lbaselib.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2018-12-28 15:42:34 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2018-12-28 15:42:34 -0200
commit437a5b07d415e1a74160ddfd804017171d6cc5cb (patch)
tree861f9a56ae175eaed91c163409c33ab85bee7ff9 /lbaselib.c
parentba7da13ec5938f978c37d63aa40a3e340b301f79 (diff)
downloadlua-437a5b07d415e1a74160ddfd804017171d6cc5cb.tar.gz
lua-437a5b07d415e1a74160ddfd804017171d6cc5cb.tar.bz2
lua-437a5b07d415e1a74160ddfd804017171d6cc5cb.zip
Added a warning system to Lua
The warning system is just a way for Lua to emit warnings, messages to the programmer that do not interfere with the running program.
Diffstat (limited to 'lbaselib.c')
-rw-r--r--lbaselib.c8
1 files changed, 8 insertions, 0 deletions
diff --git a/lbaselib.c b/lbaselib.c
index 7c0ebfec..26683a1d 100644
--- a/lbaselib.c
+++ b/lbaselib.c
@@ -43,6 +43,13 @@ static int luaB_print (lua_State *L) {
43} 43}
44 44
45 45
46static int luaB_warn (lua_State *L) {
47 const char *msg = luaL_checkstring(L, 1);
48 lua_warning(L, msg);
49 return 0;
50}
51
52
46#define SPACECHARS " \f\n\r\t\v" 53#define SPACECHARS " \f\n\r\t\v"
47 54
48static const char *b_str2int (const char *s, int base, lua_Integer *pn) { 55static const char *b_str2int (const char *s, int base, lua_Integer *pn) {
@@ -482,6 +489,7 @@ static const luaL_Reg base_funcs[] = {
482 {"pairs", luaB_pairs}, 489 {"pairs", luaB_pairs},
483 {"pcall", luaB_pcall}, 490 {"pcall", luaB_pcall},
484 {"print", luaB_print}, 491 {"print", luaB_print},
492 {"warn", luaB_warn},
485 {"rawequal", luaB_rawequal}, 493 {"rawequal", luaB_rawequal},
486 {"rawlen", luaB_rawlen}, 494 {"rawlen", luaB_rawlen},
487 {"rawget", luaB_rawget}, 495 {"rawget", luaB_rawget},