diff options
Diffstat (limited to 'lbaselib.c')
-rw-r--r-- | lbaselib.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lbaselib.c,v 1.300 2014/10/07 18:29:13 roberto Exp roberto $ | 2 | ** $Id: lbaselib.c,v 1.301 2014/10/15 14:27:40 roberto Exp roberto $ |
3 | ** Basic library | 3 | ** Basic library |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -32,8 +32,7 @@ static int luaB_print (lua_State *L) { | |||
32 | lua_call(L, 1, 1); | 32 | lua_call(L, 1, 1); |
33 | s = lua_tolstring(L, -1, &l); /* get result */ | 33 | s = lua_tolstring(L, -1, &l); /* get result */ |
34 | if (s == NULL) | 34 | if (s == NULL) |
35 | return luaL_error(L, | 35 | return luaL_error(L, "'tostring' must return a string to 'print'"); |
36 | LUA_QL("tostring") " must return a string to " LUA_QL("print")); | ||
37 | if (i>1) luai_writestring("\t", 1); | 36 | if (i>1) luai_writestring("\t", 1); |
38 | luai_writestring(s, l); | 37 | luai_writestring(s, l); |
39 | lua_pop(L, 1); /* pop result */ | 38 | lua_pop(L, 1); /* pop result */ |