This commit is contained in:
Roberto Ierusalimschy
2005-08-25 16:55:38 -03:00
parent 39cdbce23e
commit be666a662b
2 changed files with 4 additions and 5 deletions

5
lua.c
View File

@@ -1,5 +1,5 @@
/*
** $Id: lua.c,v 1.146 2005/06/28 13:01:50 roberto Exp roberto $
** $Id: lua.c,v 1.147 2005/08/25 15:39:16 roberto Exp roberto $
** Lua stand-alone interpreter
** See Copyright Notice in lua.h
*/
@@ -137,8 +137,7 @@ static int dolibrary (lua_State *L, const char *name) {
static const char *get_prompt (lua_State *L, int firstline) {
const char *p;
lua_pushstring(L, firstline ? "_PROMPT" : "_PROMPT2");
lua_rawget(L, LUA_GLOBALSINDEX);
lua_getfield(L, LUA_GLOBALSINDEX, firstline ? "_PROMPT" : "_PROMPT2");
p = lua_tostring(L, -1);
if (p == NULL) p = (firstline ? LUA_PROMPT : LUA_PROMPT2);
lua_pop(L, 1); /* remove global */