mirror of
https://github.com/lua/lua
synced 2025-03-28 08:33:17 +03:00
pops the string from 'get_prompt' only after using it
This commit is contained in:
parent
7a3de1aba3
commit
ab7086e209
7
lua.c
7
lua.c
@ -1,5 +1,5 @@
|
||||
/*
|
||||
** $Id: lua.c,v 1.204 2012/04/20 17:05:17 roberto Exp roberto $
|
||||
** $Id: lua.c,v 1.205 2012/05/23 15:37:09 roberto Exp roberto $
|
||||
** Lua stand-alone interpreter
|
||||
** See Copyright Notice in lua.h
|
||||
*/
|
||||
@ -237,7 +237,6 @@ static const char *get_prompt (lua_State *L, int firstline) {
|
||||
lua_getglobal(L, firstline ? "_PROMPT" : "_PROMPT2");
|
||||
p = lua_tostring(L, -1);
|
||||
if (p == NULL) p = (firstline ? LUA_PROMPT : LUA_PROMPT2);
|
||||
lua_pop(L, 1); /* remove global */
|
||||
return p;
|
||||
}
|
||||
|
||||
@ -263,7 +262,9 @@ static int pushline (lua_State *L, int firstline) {
|
||||
char *b = buffer;
|
||||
size_t l;
|
||||
const char *prmt = get_prompt(L, firstline);
|
||||
if (lua_readline(L, b, prmt) == 0)
|
||||
int readstatus = lua_readline(L, b, prmt);
|
||||
lua_pop(L, 1); /* remove result from 'get_prompt' */
|
||||
if (readstatus == 0)
|
||||
return 0; /* no input */
|
||||
l = strlen(b);
|
||||
if (l > 0 && b[l-1] == '\n') /* line ends with newline? */
|
||||
|
Loading…
x
Reference in New Issue
Block a user