Current File : //usr/local/apps/perl/lib/site_perl/5.30.0/x86_64-linux/libintl.ph |
require '_h2ph_pre.ph';
no warnings qw(redefine misc);
unless(defined(&_LIBINTL_H)) {
eval 'sub _LIBINTL_H () {1;}' unless defined(&_LIBINTL_H);
require 'features.ph';
eval 'sub __USE_GNU_GETTEXT () {1;}' unless defined(&__USE_GNU_GETTEXT);
eval 'sub __GNU_GETTEXT_SUPPORTED_REVISION {
my($major) = @_;
eval q((($major) == 0? 1: -1));
}' unless defined(&__GNU_GETTEXT_SUPPORTED_REVISION);
if(defined (&__OPTIMIZE__) && !defined (&__cplusplus)) {
eval 'sub __need_NULL () {1;}' unless defined(&__need_NULL);
require 'stddef.ph';
require 'locale.ph';
eval 'sub gettext {
my($msgid) = @_;
eval q( &dgettext ( &NULL, $msgid));
}' unless defined(&gettext);
eval 'sub dgettext {
my($domainname, $msgid) = @_;
eval q( &dcgettext ($domainname, $msgid, &LC_MESSAGES));
}' unless defined(&dgettext);
eval 'sub ngettext {
my($msgid1, $msgid2, $n) = @_;
eval q( &dngettext ( &NULL, $msgid1, $msgid2, $n));
}' unless defined(&ngettext);
eval 'sub dngettext {
my($domainname, $msgid1, $msgid2, $n) = @_;
eval q( &dcngettext ($domainname, $msgid1, $msgid2, $n, &LC_MESSAGES));
}' unless defined(&dngettext);
}
}
1;