Current File : //usr/local/apps/perl/lib/site_perl/5.30.0/x86_64-linux/getopt.ph |
require '_h2ph_pre.ph';
no warnings qw(redefine misc);
unless(defined(&_GETOPT_H)) {
unless(defined(&__need_getopt)) {
eval 'sub _GETOPT_H () {1;}' unless defined(&_GETOPT_H);
}
if(!defined (&__GNU_LIBRARY__)) {
require 'ctype.ph';
}
unless(defined(&__THROW)) {
unless(defined(&__GNUC_PREREQ)) {
eval 'sub __GNUC_PREREQ {
my($maj, $min) = @_;
eval q((0));
}' unless defined(&__GNUC_PREREQ);
}
if(defined (&__cplusplus) && &__GNUC_PREREQ (2,8)) {
eval 'sub __THROW () { &throw ();}' unless defined(&__THROW);
} else {
eval 'sub __THROW () {1;}' unless defined(&__THROW);
}
}
if(defined(&__cplusplus)) {
}
unless(defined(&__need_getopt)) {
eval 'sub no_argument () {0;}' unless defined(&no_argument);
eval 'sub required_argument () {1;}' unless defined(&required_argument);
eval 'sub optional_argument () {2;}' unless defined(&optional_argument);
}
if(defined(&__GNU_LIBRARY__)) {
if(defined (&__need_getopt) && defined (&__USE_POSIX2) && !defined (&__USE_POSIX_IMPLICITLY) && !defined (&__USE_GNU)) {
if(defined(&__REDIRECT)) {
} else {
eval 'sub getopt () { &__posix_getopt;}' unless defined(&getopt);
}
}
} else {
}
unless(defined(&__need_getopt)) {
}
if(defined(&__cplusplus)) {
}
undef(&__need_getopt) if defined(&__need_getopt);
}
1;