shithub: riscv

Info  •  Files  •  Log  •  Branches

fixed fwrite (hopefully didn't break anything)

--- a/sys/src/ape/lib/ap/stdio/fwrite.c

+++ b/sys/src/ape/lib/ap/stdio/fwrite.c

@@ -39,9 +39,11 @@

 					goto ret;

 				}

 			}else{

-				if(_IO_putc(*s, f)==EOF)

+				if(f->flags&APPEND) lseek(f->fd, 0L, SEEK_END);

+				if((d=write(f->fd, s, n))<=0) {

+					f->state=ERR;

 					goto ret;

-				d=1;

+				}

 			}

 		}

 		s+=d;

-- 

⑨