handle stream error
This commit is contained in:
parent
26d2e9721c
commit
be1ce69e07
@ -596,7 +596,8 @@ static Int doformat(volatile Term otail, volatile Term oargs,
|
|||||||
finfo.lstart = 0;
|
finfo.lstart = 0;
|
||||||
if (true || !(GLOBAL_Stream[sno].status & InMemory_Stream_f))
|
if (true || !(GLOBAL_Stream[sno].status & InMemory_Stream_f))
|
||||||
sno = Yap_OpenBufWriteStream(PASS_REGS1);
|
sno = Yap_OpenBufWriteStream(PASS_REGS1);
|
||||||
|
if (sno < 0)
|
||||||
|
return false;
|
||||||
f_putc = GLOBAL_Stream[sno0].stream_wputc;
|
f_putc = GLOBAL_Stream[sno0].stream_wputc;
|
||||||
if (sno == -1) {
|
if (sno == -1) {
|
||||||
if (!alloc_fstr)
|
if (!alloc_fstr)
|
||||||
|
Reference in New Issue
Block a user