diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix readline interrupts.

Browse Source
This commit is contained in:
Vítor Santos Costa 2013-01-19 09:59:31 +00:00
parent c03b5095a3
commit 0e262df2ee
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
C/iopreds.c
View File

@ -219,10 +219,10 @@ Yap_GetCharForSIGINT(void)
{
int ch;
/* ask for a new line */
fprintf(stderr, "Action (h for help): ");
ch = getc(stdin);
Sfprintf(Serror, "\nAction (h for help): ");
ch = Sgetchar();
/* first process up to end of line */
while ((fgetc(stdin)) != '\n');
while ((Sfgetc(Sinput)) != '\n');
newline = TRUE;
return ch;
}