summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-06-25 18:56:59 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-06-25 18:56:59 +0000
commit76b4e777616f9f9ab84de19fa2cc4a368604dcf1 (patch)
treea0c74894005806a9c176f2d1eed57241b9dbd287 /ext
parentd41de25ae6318c70d61484048a5653774b9b3ad9 (diff)
downloadperl-76b4e777616f9f9ab84de19fa2cc4a368604dcf1.tar.gz
mknod() is not POSIX, so remove the POSIX pieces from change#1199
p4raw-link: @1199 on //depot/perl: 6990d9917c06c8c6c480c9c385d7d2ed536c8d24 p4raw-id: //depot/perl@1215
Diffstat (limited to 'ext')
-rw-r--r--ext/POSIX/POSIX.pm2
-rw-r--r--ext/POSIX/POSIX.pod6
-rw-r--r--ext/POSIX/POSIX.xs13
3 files changed, 1 insertions, 20 deletions
diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm
index b95249ce43..32010d62e0 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 91ef781c12..4726487b47 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 568fbeee73..f48b792d2d 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