shithub: mc

Info  •  Files  •  Log  •  Branches

Only succeed blatting if we write the whole buffer.

    Writing without error isn't quite the right condition.

--- a/libstd/blat.myr

+++ b/libstd/blat.myr

@@ -23,11 +23,13 @@

 	n = 0

 	while true

 		written = write(fd, buf[n:])

-		if written <= 0

+		if written == 0

 			goto done

+		elif written < 0

+			goto fail

 		;;

 		n += written

 	;;

 :done

-	-> written == 0

+	-> written == 0 && n == buf.len

 }