fix prompt in silent mode (obs from Tony Wilson)
This commit is contained in:
parent
915ae47d18
commit
7598b56c38
@ -1550,13 +1550,17 @@ ConsoleGetc(int sno)
|
||||
int ch;
|
||||
|
||||
restart:
|
||||
/* keep the prompt around, just in case, but don't actually
|
||||
show it in silent mode */
|
||||
if (newline) {
|
||||
if (!yap_flags[QUIET_MODE_FLAG]) {
|
||||
char *cptr = Prompt, ch;
|
||||
|
||||
/* use the default routine */
|
||||
while ((ch = *cptr++) != '\0') {
|
||||
Stream[StdErrStream].stream_putc(StdErrStream, ch);
|
||||
}
|
||||
}
|
||||
strncpy (Prompt, RepAtom (*AtPrompt)->StrOfAE, MAX_PROMPT);
|
||||
newline = FALSE;
|
||||
}
|
||||
|
Reference in New Issue
Block a user