fix prompt in silent mode (obs from Tony Wilson)
This commit is contained in:
parent
915ae47d18
commit
7598b56c38
12
C/iopreds.c
12
C/iopreds.c
|
@ -1550,12 +1550,16 @@ ConsoleGetc(int sno)
|
|||
int ch;
|
||||
|
||||
restart:
|
||||
/* keep the prompt around, just in case, but don't actually
|
||||
show it in silent mode */
|
||||
if (newline) {
|
||||
char *cptr = Prompt, ch;
|
||||
if (!yap_flags[QUIET_MODE_FLAG]) {
|
||||
char *cptr = Prompt, ch;
|
||||
|
||||
/* use the default routine */
|
||||
while ((ch = *cptr++) != '\0') {
|
||||
Stream[StdErrStream].stream_putc(StdErrStream, 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