aboutsummaryrefslogtreecommitdiff
path: root/lbaselib.c
diff options
context:
space:
mode:
Diffstat (limited to 'lbaselib.c')
-rw-r--r--lbaselib.c7
1 files changed, 3 insertions, 4 deletions
diff --git a/lbaselib.c b/lbaselib.c
index 93ddc2ac..cbaf3b4e 100644
--- a/lbaselib.c
+++ b/lbaselib.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lbaselib.c,v 1.22 2001/02/06 13:59:29 roberto Exp roberto $ 2** $Id: lbaselib.c,v 1.23 2001/02/09 19:52:24 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*/
@@ -284,9 +284,8 @@ static int luaB_dostring (lua_State *L) {
284 int oldtop = lua_gettop(L); 284 int oldtop = lua_gettop(L);
285 size_t l; 285 size_t l;
286 const char *s = luaL_check_lstr(L, 1, &l); 286 const char *s = luaL_check_lstr(L, 1, &l);
287 if (*s == '\33') /* binary files start with ESC... */ 287 const char *chunkname = luaL_opt_string(L, 2, s);
288 lua_error(L, "`dostring' cannot run pre-compiled code"); 288 return passresults(L, lua_dobuffer(L, s, l, chunkname), oldtop);
289 return passresults(L, lua_dobuffer(L, s, l, luaL_opt_string(L, 2, s)), oldtop);
290} 289}
291 290
292 291