X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/disorder/blobdiff_plain/460b9539a7c15580e41a71bbc0f47ae776238915..a99c4e9a49364934a3f74f003507477b9840acb2:/lib/syscalls.c

diff --git a/lib/syscalls.c b/lib/syscalls.c
index ddfcb46..f05b644 100644
--- a/lib/syscalls.c
+++ b/lib/syscalls.c
@@ -66,6 +66,13 @@ void nonblock(int fd) {
 					fcntl(fd, F_GETFL)) | O_NONBLOCK));
 }
 
+void blocking(int fd) {
+  mustnotbeminus1("fcntl F_SETFL",
+		  fcntl(fd, F_SETFL,
+			mustnotbeminus1("fcntl F_GETFL",
+					fcntl(fd, F_GETFL)) & ~O_NONBLOCK));
+}
+
 void cloexec(int fd) {
   mustnotbeminus1("fcntl F_SETFD",
 		  fcntl(fd, F_SETFD,
@@ -148,4 +155,3 @@ c-basic-offset:2
 comment-column:40
 End:
 */
-/* arch-tag:0be4384b4081d464d1a2fad746469d3d */