This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Only use proxy constant subroutines for 5.9.x.
[perl5.git] / ext / Fcntl / Makefile.PL
CommitLineData
42793c05 1use ExtUtils::MakeMaker;
1cb0fb50 2use ExtUtils::Constant 0.11 'WriteConstants';
4ad3186e 3WriteMakefile(
1adb159c 4 NAME => 'Fcntl',
69158f75 5 MAN3PODS => {}, # Pods will be built by installman.
4ad3186e 6 XSPROTOARG => '-noprototypes', # XXX remove later?
c07a80fd 7 VERSION_FROM => 'Fcntl.pm',
ece2ffd9 8 realclean => {FILES=> 'const-c.inc const-xs.inc'},
4ad3186e
PP
9);
10
117979aa 11my @names = (qw(
5bb8c70c
JH
12 DN_ACCESS DN_MODIFY DN_CREATE DN_DELETE DN_RENAME
13 DN_ATTRIB DN_MULTISHOT FAPPEND FASYNC FCREAT FDEFER
14 FDSYNC FD_CLOEXEC FEXCL FLARGEFILE FNDELAY FNONBLOCK
15 FRSYNC FSYNC FTRUNC F_ALLOCSP F_ALLOCSP64 F_COMPAT
16 F_DUP2FD F_DUPFD F_EXLCK F_FREESP F_FREESP64 F_FSYNC
17 F_FSYNC64 F_GETFD F_GETFL F_GETLEASE F_GETLK F_GETLK64
18 F_GETOWN F_GETSIG F_NODNY F_NOTIFY F_POSIX F_RDACC
19 F_RDDNY F_RDLCK F_RWACC F_RWDNY F_SETFD F_SETFL
20 F_SETLEASE F_SETLK F_SETLK64 F_SETLKW F_SETLKW64
21 F_SETOWN F_SETSIG F_SHARE F_SHLCK F_UNLCK F_UNSHARE
22 F_WRACC F_WRDNY F_WRLCK LOCK_MAND LOCK_READ LOCK_WRITE
23 LOCK_RW O_ACCMODE O_ALIAS O_APPEND O_ASYNC O_BINARY
24 O_CREAT O_DEFER O_DIRECT O_DIRECTORY O_DSYNC O_EXCL
25 O_EXLOCK O_IGNORE_CTTY O_LARGEFILE O_NDELAY O_NOATIME
26 O_NOCTTY O_NOFOLLOW O_NOINHERIT O_NOLINK O_NONBLOCK
27 O_NOTRANS O_RANDOM O_RAW O_RDONLY O_RDWR O_RSRC O_RSYNC
56ea57b7
JH
28 O_SEQUENTIAL O_SHLOCK O_SYNC O_TEMPORARY O_TEXT O_TRUNC
29 O_WRONLY S_ENFMT S_IEXEC S_IFBLK S_IFCHR S_IFDIR
30 S_IFIFO S_IFLNK S_IFREG S_IFSOCK S_IFWHT S_IREAD
31 S_IRGRP S_IROTH S_IRUSR S_IRWXG S_IRWXO S_IRWXU S_ISGID
32 S_ISTXT S_ISUID S_ISVTX S_IWGRP S_IWOTH S_IWRITE
33 S_IWUSR S_IXGRP S_IXOTH S_IXUSR),
72f7b9a1
NC
34 {name=>"LOCK_SH", default=>["IV", "1"]},
35 {name=>"LOCK_EX", default=>["IV", "2"]},
36 {name=>"LOCK_NB", default=>["IV", "4"]},
37 {name=>"LOCK_UN", default=>["IV", "8"]},
38 {name=>"SEEK_SET", default=>["IV", "0"]},
39 {name=>"SEEK_CUR", default=>["IV", "1"]},
40 {name=>"SEEK_END", default=>["IV", "2"]},
41 {name=>"_S_IFMT", macro=>"S_IFMT", value=>"S_IFMT"});
42WriteConstants(
8ad94821 43 ($] > 5.009002 ? (PROXYSUBS => 1) : ()),
72f7b9a1
NC
44 NAME => 'Fcntl',
45 NAMES => \@names,
46);