This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
consting for .c files in tests
[perl5.git] / vos / vosish.h
index d600065..c9e3765 100644 (file)
@@ -1 +1,18 @@
+#ifdef __GNUC__
+#include "../unixish.h"
+#else
 #include "unixish.h"
+#endif
+
+/* VOS does not support SA_SIGINFO, so undefine the macro.  This
+   is a work-around for posix-1302.  */
+#undef SA_SIGINFO
+
+/* The following declaration is an avoidance for posix-950. */
+extern int ioctl (int fd, int request, ...);
+
+/* Specify a prototype for truncate() since we are supplying one. */
+extern int truncate (const char *path, off_t len);
+
+/* Specify a prototype for socketpair() since we supplying one. */
+extern int socketpair (int family, int type, int protocol, int fd[2]);