summaryrefslogtreecommitdiff
path: root/config/auto-aux/async_io.c
diff options
context:
space:
mode:
authorNo author <no_author@ocaml.org>1995-06-15 16:08:54 +0000
committerNo author <no_author@ocaml.org>1995-06-15 16:08:54 +0000
commit77b1c8b89fd8940a63b17c41eb37161e5d159831 (patch)
tree43dbfb3982d9166b717199cb8faa97bdce30add7 /config/auto-aux/async_io.c
parentba79d4bd1f01a70b892c69f6a5e6e86714a023d6 (diff)
downloadocaml-unlabeled-1.2.2.tar.gz
This commit was manufactured by cvs2svn to create branchunlabeled-1.2.2
'unlabeled-1.2.2'. git-svn-id: http://caml.inria.fr/svn/ocaml/branches/unlabeled-1.2.2@37 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'config/auto-aux/async_io.c')
-rw-r--r--config/auto-aux/async_io.c44
1 files changed, 0 insertions, 44 deletions
diff --git a/config/auto-aux/async_io.c b/config/auto-aux/async_io.c
deleted file mode 100644
index 2fb04a6c67..0000000000
--- a/config/auto-aux/async_io.c
+++ /dev/null
@@ -1,44 +0,0 @@
-#include <stdio.h>
-#include <fcntl.h>
-#include <signal.h>
-#include <errno.h>
-#include "s.h"
-
-int signalled;
-
-void sigio_handler(arg)
- int arg;
-{
- signalled = 1;
-}
-
-int main()
-{
-#if defined(SIGIO) && defined(FASYNC) && defined(F_SETFL) && defined(F_SETOWN)
- int p[2];
- int ret;
-#define OUT 0
-#define IN 1
- if (pipe(p) == -1) return 1;
- signalled = 0;
- signal(SIGIO, sigio_handler);
- ret = fcntl(p[OUT], F_GETFL, 0);
- fcntl(p[OUT], F_SETFL, ret | FASYNC);
- fcntl(p[OUT], F_SETOWN, getpid());
- switch(fork()) {
- case -1:
- return 1;
- case 0:
- close(p[OUT]);
- write(p[IN], "x", 1);
- sleep(1);
- exit(0);
- default:
- close(p[IN]);
- while(wait(NULL) == -1 && errno == EINTR) /*nothing*/;
- }
- if (signalled) return 0; else return 1;
-#else
- return 1;
-#endif
-}