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

handle EOF

This commit is contained in:
Vitor Santos Costa 2016-07-31 09:54:07 -05:00
parent 63b985c452
commit 5f2964cce6
1 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
os/readutil.c
View File

@ -63,11 +63,11 @@ static Int rl_to_codes(Term TEnd, int do_as_binary, int arity USES_REGS) {
do {
ch = st->stream_wgetc_for_read(sno);
if (ch < 127) {
*pt++ = ch;
if (ch < 0) {
ch = '\n';
pt[-1] = '\n';
}
break;
}
*pt++ = ch;
} else {
pt += get_utf8(pt, 4, &ch);
if (pt + 4 == buf + buf_sz)
@ -154,11 +154,10 @@ static Int read_line_to_string(USES_REGS1) {
do {
ch = st->stream_wgetc_for_read(sno);
if (ch < 127) {
*pt++ = ch;
if (ch < 0) {
ch = '\n';
pt[-1] = '\n';
break;
}
*pt++ = ch;
} else {
pt += get_utf8(pt, 4, &ch);
if (pt + 4 == buf + buf_sz)