1));
}' unless defined(&__bos);
eval 'sub __bos0 {
my($ptr) = @_;
eval q( &__builtin_object_size ($ptr, 0));
}' unless defined(&__bos0);
if( &__GNUC_PREREQ (4,3)) {
eval 'sub __warndecl {
my($name, $msg) = @_;
eval q( &extern &void $name ( &void) &__attribute__(( &__warning__ ($msg))));
}' unless defined(&__warndecl);
eval 'sub __warnattr {
my($msg) = @_;
eval q( &__attribute__(( &__warning__ ($msg))));
}' unless defined(&__warnattr);
eval 'sub __errordecl {
my($name, $msg) = @_;
eval q( &extern &void $name ( &void) &__attribute__(( &__error__ ($msg))));
}' unless defined(&__errordecl);
} else {
eval 'sub __warndecl {
my($name, $msg) = @_;
eval q( &extern &void $name ( &void));
}' unless defined(&__warndecl);
eval 'sub __warnattr {
my($msg) = @_;
eval q();
}' unless defined(&__warnattr);
eval 'sub __errordecl {
my($name, $msg) = @_;
eval q( &extern &void $name ( &void));
}' unless defined(&__errordecl);
}
if( &__GNUC_PREREQ (2,97)) {
eval 'sub __flexarr () {[];}' unless defined(&__flexarr);
} else {
if(defined(&__GNUC__)) {
eval 'sub __flexarr () {[0];}' unless defined(&__flexarr);
} else {
if(defined (&__STDC_VERSION__) && (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef) >= 199901) {
eval 'sub __flexarr () {[];}' unless defined(&__flexarr);
} else {
eval 'sub __flexarr () {[1];}' unless defined(&__flexarr);
}
}
}
if(defined (&__GNUC__) && (defined(&__GNUC__) ? &__GNUC__ : undef) >= 2) {
eval 'sub __REDIRECT {
my($name, $proto, $alias) = @_;
eval q(\\"(assembly code)\\");
}' unless defined(&__REDIRECT);
if(defined(&__cplusplus)) {
eval 'sub __REDIRECT_NTH {
my($name, $proto, $alias) = @_;
eval q(\\"(assembly code)\\");
}' unless defined(&__REDIRECT_NTH);
eval 'sub __REDIRECT_NTHNL {
my($name, $proto, $alias) = @_;
eval q(\\"(assembly code)\\");
}' unless defined(&__REDIRECT_NTHNL);
} else {
eval 'sub __REDIRECT_NTH {
my($name, $proto, $alias) = @_;
eval q(\\"(assembly code)\\");
}' unless defined(&__REDIRECT_NTH);
eval 'sub __REDIRECT_NTHNL {
my($name, $proto, $alias) = @_;
eval q(\\"(assembly code)\\");
}' unless defined(&__REDIRECT_NTHNL);
}
eval 'sub __ASMNAME {
my($cname) = @_;
eval q( &__ASMNAME2 ( &__USER_LABEL_PREFIX__, $cname));
}' unless defined(&__ASMNAME);
eval 'sub __ASMNAME2 {
my($prefix, $cname) = @_;
eval q( &__STRING ($prefix) $cname);
}' unless defined(&__ASMNAME2);
}
if(!defined (&__GNUC__) || (defined(&__GNUC__) ? &__GNUC__ : undef) < 2) {
eval 'sub __attribute__ {
my($xyz) = @_;
eval q();
}' unless defined(&__attribute__);
}
if( &__GNUC_PREREQ (2,96)) {
eval 'sub __attribute_malloc__ () { &__attribute__ (( &__malloc__));}' unless defined(&__attribute_malloc__);
} else {
eval 'sub __attribute_malloc__ () {1;}' unless defined(&__attribute_malloc__);
}
if( &__GNUC_PREREQ (2,96)) {
eval 'sub __attribute_pure__ () { &__attribute__ (( &__pure__));}' unless defined(&__attribute_pure__);
} else {
eval 'sub __attribute_pure__ () {1;}' unless defined(&__attribute_pure__);
}
if( &__GNUC_PREREQ (2,5)) {
eval 'sub __attribute_const__ () { &__attribute__ (( &__const__));}' unless defined(&__attribute_const__);
} else {
eval 'sub __attribute_const__ () {1;}' unless defined(&__attribute_const__);
}
if( &__GNUC_PREREQ (3,1)) {
eval 'sub __attribute_used__ () { &__attribute__ (( &__used__));}' unless defined(&__attribute_used__);
eval 'sub __attribute_noinline__ () { &__attribute__ (( &__noinline__));}' unless defined(&__attribute_noinline__);
} else {
eval 'sub __attribute_used__ () { &__attribute__ (( &__unused__));}' unless defined(&__attribute_used__);
eval 'sub __attribute_noinline__ () {1;}' unless defined(&__attribute_noinline__);
}
if( &__GNUC_PREREQ (3,2)) {
eval 'sub __attribute_deprecated__ () { &__attribute__ (( &__deprecated__));}' unless defined(&__attribute_deprecated__);
} else {
eval 'sub __attribute_deprecated__ () {1;}' unless defined(&__attribute_deprecated__);
}
if( &__GNUC_PREREQ (2,8)) {
eval 'sub __attribute_format_arg__ {
my($x) = @_;
eval q( &__attribute__ (( &__format_arg__ ($x))));
}' unless defined(&__attribute_format_arg__);
} else {
eval 'sub __attribute_format_arg__ {
my($x) = @_;
eval q();
}' unless defined(&__attribute_format_arg__);
}
if( &__GNUC_PREREQ (2,97)) {
eval 'sub __attribute_format_strfmon__ {
my($a,$b) = @_;
eval q( &__attribute__ (( &__format__ ( &__strfmon__, $a, $b))));
}' unless defined(&__attribute_format_strfmon__);
} else {
eval 'sub __attribute_format_strfmon__ {
my($a,$b) = @_;
eval q();
}' unless defined(&__attribute_format_strfmon__);
}
if( &__GNUC_PREREQ (3,3)) {
eval 'sub __nonnull {
my($params) = @_;
eval q( &__attribute__ (( &__nonnull__ $params)));
}' unless defined(&__nonnull);
} else {
eval 'sub __nonnull {
my($params) = @_;
eval q();
}' unless defined(&__nonnull);
}
if( &__GNUC_PREREQ (3,4)) {
eval 'sub __attribute_warn_unused_result__ () { &__attribute__ (( &__warn_unused_result__));}' unless defined(&__attribute_warn_unused_result__);
if((defined(&__USE_FORTIFY_LEVEL) ? &__USE_FORTIFY_LEVEL : undef) > 0) {
eval 'sub __wur () { &__attribute_warn_unused_result__;}' unless defined(&__wur);
}
} else {
eval 'sub __attribute_warn_unused_result__ () {1;}' unless defined(&__attribute_warn_unused_result__);
}
unless(defined(&__wur)) {
eval 'sub __wur () {1;}' unless defined(&__wur);
}
if( &__GNUC_PREREQ (3,2)) {
eval 'sub __always_inline () { &__inline &__attribute__ (( &__always_inline__));}' unless defined(&__always_inline);
} else {
eval 'sub __always_inline () { &__inline;}' unless defined(&__always_inline);
}
if( &__GNUC_PREREQ (4,3)) {
eval 'sub __attribute_artificial__ () { &__attribute__ (( &__artificial__));}' unless defined(&__attribute_artificial__);
} else {
eval 'sub __attribute_artificial__ () {1;}' unless defined(&__attribute_artificial__);
}
if((!defined (&__cplusplus) || &__GNUC_PREREQ (4,3) || (defined (&__clang__) && (defined (&__GNUC_STDC_INLINE__) || defined (&__GNUC_GNU_INLINE__))))) {
if(defined (&__GNUC_STDC_INLINE__) || defined (&__cplusplus)) {
eval 'sub __extern_inline () { &extern &__inline &__attribute__ (( &__gnu_inline__));}' unless defined(&__extern_inline);
eval 'sub __extern_always_inline () { &extern &__always_inline &__attribute__ (( &__gnu_inline__));}' unless defined(&__extern_always_inline);
} else {
eval 'sub __extern_inline () { &extern &__inline;}' unless defined(&__extern_inline);
eval 'sub __extern_always_inline () { &extern &__always_inline;}' unless defined(&__extern_always_inline);
}
}
if(defined(&__extern_always_inline)) {
eval 'sub __fortify_function () { &__extern_always_inline &__attribute_artificial__;}' unless defined(&__fortify_function);
}
if( &__GNUC_PREREQ (4,3)) {
eval 'sub __va_arg_pack () {
eval q( &__builtin_va_arg_pack ());
}' unless defined(&__va_arg_pack);
eval 'sub __va_arg_pack_len () {
eval q( &__builtin_va_arg_pack_len ());
}' unless defined(&__va_arg_pack_len);
}
if(! &__GNUC_PREREQ (2,8)) {
eval 'sub __extension__ () {1;}' unless defined(&__extension__);
}
if(! &__GNUC_PREREQ (2,92)) {
eval 'sub __restrict () {1;}' unless defined(&__restrict);
}
if( &__GNUC_PREREQ (3,1) && !defined (&__GNUG__)) {
eval 'sub __restrict_arr () { &__restrict;}' unless defined(&__restrict_arr);
} else {
if(defined(&__GNUC__)) {
eval 'sub __restrict_arr () {1;}' unless defined(&__restrict_arr);
} else {
if(defined (&__STDC_VERSION__) && (defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef) >= 199901) {
eval 'sub __restrict_arr () { &restrict;}' unless defined(&__restrict_arr);
} else {
eval 'sub __restrict_arr () {1;}' unless defined(&__restrict_arr);
}
}
}
if((defined(&__GNUC__) ? &__GNUC__ : undef) >= 3) {
eval 'sub __glibc_unlikely {
my($cond) = @_;
eval q( &__builtin_expect(($cond), 0));
}' unless defined(&__glibc_unlikely);
eval 'sub __glibc_likely {
my($cond) = @_;
eval q( &__builtin_expect(($cond), 1));
}' unless defined(&__glibc_likely);
} else {
eval 'sub __glibc_unlikely {
my($cond) = @_;
eval q(($cond));
}' unless defined(&__glibc_unlikely);
eval 'sub __glibc_likely {
my($cond) = @_;
eval q(($cond));
}' unless defined(&__glibc_likely);
}
require 'bits/wordsize.ph';
if(defined (&__LONG_DOUBLE_MATH_OPTIONAL) && defined (&__NO_LONG_DOUBLE_MATH)) {
eval 'sub __LDBL_COMPAT () {1;}' unless defined(&__LDBL_COMPAT);
if(defined(&__REDIRECT)) {
eval 'sub __LDBL_REDIR1 {
my($name, $proto, $alias) = @_;
eval q( &__REDIRECT ($name, $proto, $alias));
}' unless defined(&__LDBL_REDIR1);
eval 'sub __LDBL_REDIR {
my($name, $proto) = @_;
eval q( &__LDBL_REDIR1 ($name, $proto, &__nldbl_$name));
}' unless defined(&__LDBL_REDIR);
eval 'sub __LDBL_REDIR1_NTH {
my($name, $proto, $alias) = @_;
eval q( &__REDIRECT_NTH ($name, $proto, $alias));
}' unless defined(&__LDBL_REDIR1_NTH);
eval 'sub __LDBL_REDIR_NTH {
my($name, $proto) = @_;
eval q( &__LDBL_REDIR1_NTH ($name, $proto, &__nldbl_$name));
}' unless defined(&__LDBL_REDIR_NTH);
eval 'sub __LDBL_REDIR1_DECL {
my($name, $alias) = @_;
eval q( &extern &__typeof ($name) $name &__asm ( &__ASMNAME ($alias)););
}' unless defined(&__LDBL_REDIR1_DECL);
eval 'sub __LDBL_REDIR_DECL {
my($name) = @_;
eval q( &extern &__typeof ($name) $name &__asm ( &__ASMNAME (\\"__nldbl_\\" $name)););
}' unless defined(&__LDBL_REDIR_DECL);
eval 'sub __REDIRECT_LDBL {
my($name, $proto, $alias) = @_;
eval q( &__LDBL_REDIR1 ($name, $proto, &__nldbl_$alias));
}' unless defined(&__REDIRECT_LDBL);
eval 'sub __REDIRECT_NTH_LDBL {
my($name, $proto, $alias) = @_;
eval q( &__LDBL_REDIR1_NTH ($name, $proto, &__nldbl_$alias));
}' unless defined(&__REDIRECT_NTH_LDBL);
}
}
if(!defined (&__LDBL_COMPAT) || !defined (&__REDIRECT)) {
eval 'sub __LDBL_REDIR1 {
my($name, $proto, $alias) = @_;
eval q($name $proto);
}' unless defined(&__LDBL_REDIR1);
eval 'sub __LDBL_REDIR {
my($name, $proto) = @_;
eval q($name $proto);
}' unless defined(&__LDBL_REDIR);
eval 'sub __LDBL_REDIR1_NTH {
my($name, $proto, $alias) = @_;
eval q($name $proto &__THROW);
}' unless defined(&__LDBL_REDIR1_NTH);
eval 'sub __LDBL_REDIR_NTH {
my($name, $proto) = @_;
eval q($name $proto &__THROW);
}' unless defined(&__LDBL_REDIR_NTH);
eval 'sub __LDBL_REDIR_DECL {
my($name) = @_;
eval q();
}' unless defined(&__LDBL_REDIR_DECL);
if(defined(&__REDIRECT)) {
eval 'sub __REDIRECT_LDBL {
my($name, $proto, $alias) = @_;
eval q( &__REDIRECT ($name, $proto, $alias));
}' unless defined(&__REDIRECT_LDBL);
eval 'sub __REDIRECT_NTH_LDBL {
my($name, $proto, $alias) = @_;
eval q( &__REDIRECT_NTH ($name, $proto, $alias));
}' unless defined(&__REDIRECT_NTH_LDBL);
}
}
}
1;