From: Gurusamy Sarathy <gsar@cpan.org>
Date: Thu, 25 Jun 1998 18:56:59 +0000 (+0000)
Subject: mknod() is not POSIX, so remove the POSIX pieces from change#1199
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=76b4e777616f9f9ab84de19fa2cc4a368604dcf1;p=p5sagit%2Fp5-mst-13.2.git

mknod() is not POSIX, so remove the POSIX pieces from change#1199

p4raw-link: @1199 on //depot/perl: 6990d9917c06c8c6c480c9c385d7d2ed536c8d24

p4raw-id: //depot/perl@1215
---

diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm
index b95249c..32010d6 100644
--- a/ext/POSIX/POSIX.pm
+++ b/ext/POSIX/POSIX.pm
@@ -115,7 +115,7 @@ $VERSION = "1.02" ;
     sys_stat_h => [qw(S_IRGRP S_IROTH S_IRUSR S_IRWXG S_IRWXO S_IRWXU
 		S_ISBLK S_ISCHR S_ISDIR S_ISFIFO S_ISGID S_ISREG
 		S_ISUID S_IWGRP S_IWOTH S_IWUSR S_IXGRP S_IXOTH S_IXUSR
-		fstat mkfifo mknod)],
+		fstat mkfifo)],
 
     sys_times_h => [qw()],
 
diff --git a/ext/POSIX/POSIX.pod b/ext/POSIX/POSIX.pod
index 91ef781..4726487 100644
--- a/ext/POSIX/POSIX.pod
+++ b/ext/POSIX/POSIX.pod
@@ -660,12 +660,6 @@ This is similar to the C function C<mkfifo()>.
 
 Returns C<undef> on failure.
 
-=item mknod
-
-This is similar to the C function C<mknod()>.
-
-Returns C<undef> on failure.
-
 =item mktime
 
 Convert date/time info to a calendar time.
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs
index 568fbee..f48b792 100644
--- a/ext/POSIX/POSIX.xs
+++ b/ext/POSIX/POSIX.xs
@@ -65,7 +65,6 @@
 
 #  undef mkfifo
 #  define mkfifo(a,b) (not_here("mkfifo"),-1)
-#  define mknod(a,b,c) (not_here("mknod"),-1)
 #  define tzset() not_here("tzset")
 
 #if ((__VMS_VER >= 70000000) && (__DECC_VER >= 50200000)) || (__CRTL_VER >= 70000000)
@@ -107,7 +106,6 @@
 #if defined (WIN32)
 #  undef mkfifo
 #  define mkfifo(a,b) not_here("mkfifo")
-#  define mknod(a,b,c) not_here("mknod")
 #  define ttyname(a) (char*)not_here("ttyname")
 #  define sigset_t long
 #  define pid_t long
@@ -3483,17 +3481,6 @@ mkfifo(filename, mode)
 	RETVAL
 
 SysRet
-mknod(filename, mode, device)
-	char *		filename
-	Mode_t		mode
-	Dev_t		device
-    CODE:
-	TAINT_PROPER("mknod");
-	RETVAL = mknod(filename, mode, device);
-    OUTPUT:
-	RETVAL
-
-SysRet
 tcdrain(fd)
 	int		fd