Gecko [ v99win.today ]

Name	Size	Permission
linux	[ DIR ]	drwxr-xr-x
types	[ DIR ]	drwxr-xr-x
atomic_wide_counter.ph	207 B	-rw-r--r--
byteswap.ph	1.6 KB	-rw-r--r--
confname.ph	24.45 KB	-rw-r--r--
endian.ph	1.01 KB	-rw-r--r--
endianness.ph	385 B	-rw-r--r--
environments.ph	2.05 KB	-rw-r--r--
floatn-common.ph	11.71 KB	-rw-r--r--
floatn.ph	2.7 KB	-rw-r--r--
getopt_core.ph	168 B	-rw-r--r--
getopt_posix.ph	582 B	-rw-r--r--
ioctl-types.ph	1.72 KB	-rw-r--r--
ioctls.ph	3.74 KB	-rw-r--r--
long-double.ph	169 B	-rw-r--r--
posix_opt.ph	5.34 KB	-rw-r--r--
pthreadtypes-arch.ph	2.22 KB	-rw-r--r--
pthreadtypes.ph	492 B	-rw-r--r--
select.ph	889 B	-rw-r--r--
select2.ph	490 B	-rw-r--r--
sigaction.ph	1.68 KB	-rw-r--r--
sigcontext.ph	889 B	-rw-r--r--
sigevent-consts.ph	620 B	-rw-r--r--
siginfo-arch.ph	465 B	-rw-r--r--
siginfo-consts-arch.ph	207 B	-rw-r--r--
siginfo-consts.ph	4.3 KB	-rw-r--r--
signal_ext.ph	200 B	-rw-r--r--
signum-arch.ph	1.68 KB	-rw-r--r--
signum-generic.ph	1.6 KB	-rw-r--r--
sigstack.ph	441 B	-rw-r--r--
sigstksz.ph	568 B	-rw-r--r--
sigthread.ph	385 B	-rw-r--r--
sockaddr.ph	507 B	-rw-r--r--
socket-constants.ph	3.62 KB	-rw-r--r--
socket.ph	11.7 KB	-rw-r--r--
socket2.ph	177 B	-rw-r--r--
socket_type.ph	766 B	-rw-r--r--
ss_flags.ph	443 B	-rw-r--r--
stdint-intn.ph	212 B	-rw-r--r--
struct_mutex.ph	1019 B	-rw-r--r--
struct_rwlock.ph	943 B	-rw-r--r--
syscall.ph	75.59 KB	-rw-r--r--
syslog-ldbl.ph	355 B	-rw-r--r--
syslog-path.ph	363 B	-rw-r--r--
syslog.ph	404 B	-rw-r--r--
thread-shared-types.ph	427 B	-rw-r--r--
time64.ph	530 B	-rw-r--r--
timesize.ph	290 B	-rw-r--r--
types.ph	2.78 KB	-rw-r--r--
typesizes.ph	4.61 KB	-rw-r--r--
uintn-identity.ph	631 B	-rw-r--r--
unistd.ph	680 B	-rw-r--r--
unistd_ext.ph	597 B	-rw-r--r--
waitflags.ph	816 B	-rw-r--r--
waitstatus.ph	1.54 KB	-rw-r--r--
wordsize.ph	743 B	-rw-r--r--

Code Editor : floatn-common.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_BITS_FLOATN_COMMON_H)) {
    eval 'sub _BITS_FLOATN_COMMON_H () {1;}' unless defined(&_BITS_FLOATN_COMMON_H);
    require 'features.ph';
    require 'bits/long-double.ph';
    eval 'sub __HAVE_FLOAT16 () {0;}' unless defined(&__HAVE_FLOAT16);
    eval 'sub __HAVE_FLOAT32 () {1;}' unless defined(&__HAVE_FLOAT32);
    eval 'sub __HAVE_FLOAT64 () {1;}' unless defined(&__HAVE_FLOAT64);
    eval 'sub __HAVE_FLOAT32X () {1;}' unless defined(&__HAVE_FLOAT32X);
    eval 'sub __HAVE_FLOAT128X () {0;}' unless defined(&__HAVE_FLOAT128X);
    eval 'sub __HAVE_DISTINCT_FLOAT16 () { &__HAVE_FLOAT16;}' unless defined(&__HAVE_DISTINCT_FLOAT16);
    eval 'sub __HAVE_DISTINCT_FLOAT32 () {0;}' unless defined(&__HAVE_DISTINCT_FLOAT32);
    eval 'sub __HAVE_DISTINCT_FLOAT64 () {0;}' unless defined(&__HAVE_DISTINCT_FLOAT64);
    eval 'sub __HAVE_DISTINCT_FLOAT32X () {0;}' unless defined(&__HAVE_DISTINCT_FLOAT32X);
    eval 'sub __HAVE_DISTINCT_FLOAT64X () {0;}' unless defined(&__HAVE_DISTINCT_FLOAT64X);
    eval 'sub __HAVE_DISTINCT_FLOAT128X () { &__HAVE_FLOAT128X;}' unless defined(&__HAVE_DISTINCT_FLOAT128X);
    eval 'sub __HAVE_FLOAT128_UNLIKE_LDBL () {( &__HAVE_DISTINCT_FLOAT128  &&  &__LDBL_MANT_DIG__ != 113);}' unless defined(&__HAVE_FLOAT128_UNLIKE_LDBL);
    if( &__GNUC_PREREQ (7, 0)  && !defined (&__cplusplus)) {
	eval 'sub __HAVE_FLOATN_NOT_TYPEDEF () {1;}' unless defined(&__HAVE_FLOATN_NOT_TYPEDEF);
    } else {
	eval 'sub __HAVE_FLOATN_NOT_TYPEDEF () {0;}' unless defined(&__HAVE_FLOATN_NOT_TYPEDEF);
    }
    unless(defined(&__ASSEMBLER__)) {
	if((defined(&__HAVE_FLOAT16) ? &__HAVE_FLOAT16 : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		eval 'sub __f16 {
		    my($x) = @_;
    		    eval q((( &_Float16) $x &f));
		}' unless defined(&__f16);
	    } else {
		eval 'sub __f16 {
		    my($x) = @_;
    		    eval q($x &f16);
		}' unless defined(&__f16);
	    }
	}
	if((defined(&__HAVE_FLOAT32) ? &__HAVE_FLOAT32 : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		eval 'sub __f32 {
		    my($x) = @_;
    		    eval q($x &f);
		}' unless defined(&__f32);
	    } else {
		eval 'sub __f32 {
		    my($x) = @_;
    		    eval q($x &f32);
		}' unless defined(&__f32);
	    }
	}
	if((defined(&__HAVE_FLOAT64) ? &__HAVE_FLOAT64 : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		if(defined(&__NO_LONG_DOUBLE_MATH)) {
		    eval 'sub __f64 {
		        my($x) = @_;
    			eval q($x &l);
		    }' unless defined(&__f64);
		} else {
		    eval 'sub __f64 {
		        my($x) = @_;
    			eval q($x);
		    }' unless defined(&__f64);
		}
	    } else {
		eval 'sub __f64 {
		    my($x) = @_;
    		    eval q($x &f64);
		}' unless defined(&__f64);
	    }
	}
	if((defined(&__HAVE_FLOAT32X) ? &__HAVE_FLOAT32X : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		eval 'sub __f32x {
		    my($x) = @_;
    		    eval q($x);
		}' unless defined(&__f32x);
	    } else {
		eval 'sub __f32x {
		    my($x) = @_;
    		    eval q($x &f32x);
		}' unless defined(&__f32x);
	    }
	}
	if((defined(&__HAVE_FLOAT64X) ? &__HAVE_FLOAT64X : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		if((defined(&__HAVE_FLOAT64X_LONG_DOUBLE) ? &__HAVE_FLOAT64X_LONG_DOUBLE : undef)) {
		    eval 'sub __f64x {
		        my($x) = @_;
    			eval q($x &l);
		    }' unless defined(&__f64x);
		} else {
		    eval 'sub __f64x {
		        my($x) = @_;
    			eval q( &__f128 ($x));
		    }' unless defined(&__f64x);
		}
	    } else {
		eval 'sub __f64x {
		    my($x) = @_;
    		    eval q($x &f64x);
		}' unless defined(&__f64x);
	    }
	}
	if((defined(&__HAVE_FLOAT128X) ? &__HAVE_FLOAT128X : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		die("_Float128X supported but no constant suffix");
	    } else {
		eval 'sub __f128x {
		    my($x) = @_;
    		    eval q($x &f128x);
		}' unless defined(&__f128x);
	    }
	}
	if((defined(&__HAVE_FLOAT16) ? &__HAVE_FLOAT16 : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		eval 'sub __CFLOAT16 () { &__cfloat16;}' unless defined(&__CFLOAT16);
	    } else {
		eval 'sub __CFLOAT16 () { &_Complex  &_Float16;}' unless defined(&__CFLOAT16);
	    }
	}
	if((defined(&__HAVE_FLOAT32) ? &__HAVE_FLOAT32 : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		eval 'sub __CFLOAT32 () { &_Complex \'float\';}' unless defined(&__CFLOAT32);
	    } else {
		eval 'sub __CFLOAT32 () { &_Complex  &_Float32;}' unless defined(&__CFLOAT32);
	    }
	}
	if((defined(&__HAVE_FLOAT64) ? &__HAVE_FLOAT64 : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		if(defined(&__NO_LONG_DOUBLE_MATH)) {
		    eval 'sub __CFLOAT64 () { &_Complex \'long double\';}' unless defined(&__CFLOAT64);
		} else {
		    eval 'sub __CFLOAT64 () { &_Complex \'double\';}' unless defined(&__CFLOAT64);
		}
	    } else {
		eval 'sub __CFLOAT64 () { &_Complex  &_Float64;}' unless defined(&__CFLOAT64);
	    }
	}
	if((defined(&__HAVE_FLOAT32X) ? &__HAVE_FLOAT32X : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		eval 'sub __CFLOAT32X () { &_Complex \'double\';}' unless defined(&__CFLOAT32X);
	    } else {
		eval 'sub __CFLOAT32X () { &_Complex  &_Float32x;}' unless defined(&__CFLOAT32X);
	    }
	}
	if((defined(&__HAVE_FLOAT64X) ? &__HAVE_FLOAT64X : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		if((defined(&__HAVE_FLOAT64X_LONG_DOUBLE) ? &__HAVE_FLOAT64X_LONG_DOUBLE : undef)) {
		    eval 'sub __CFLOAT64X () { &_Complex \'long double\';}' unless defined(&__CFLOAT64X);
		} else {
		    eval 'sub __CFLOAT64X () { &__CFLOAT128;}' unless defined(&__CFLOAT64X);
		}
	    } else {
		eval 'sub __CFLOAT64X () { &_Complex  &_Float64x;}' unless defined(&__CFLOAT64X);
	    }
	}
	if((defined(&__HAVE_FLOAT128X) ? &__HAVE_FLOAT128X : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		die("_Float128X supported but no complex type");
	    } else {
		eval 'sub __CFLOAT128X () { &_Complex  &_Float128x;}' unless defined(&__CFLOAT128X);
	    }
	}
	if((defined(&__HAVE_FLOAT16) ? &__HAVE_FLOAT16 : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
	    }
	    if(! &__GNUC_PREREQ (7, 0)) {
		eval 'sub __builtin_huge_valf16 () {
		    eval q((( &_Float16)  &__builtin_huge_val ()));
		}' unless defined(&__builtin_huge_valf16);
		eval 'sub __builtin_inff16 () {
		    eval q((( &_Float16)  &__builtin_inf ()));
		}' unless defined(&__builtin_inff16);
		eval 'sub __builtin_nanf16 {
		    my($x) = @_;
    		    eval q((( &_Float16)  &__builtin_nan ($x)));
		}' unless defined(&__builtin_nanf16);
		eval 'sub __builtin_nansf16 {
		    my($x) = @_;
    		    eval q((( &_Float16)  &__builtin_nans ($x)));
		}' unless defined(&__builtin_nansf16);
	    }
	}
	if((defined(&__HAVE_FLOAT32) ? &__HAVE_FLOAT32 : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
	    }
	    if(! &__GNUC_PREREQ (7, 0)) {
		eval 'sub __builtin_huge_valf32 () {
		    eval q(( &__builtin_huge_valf ()));
		}' unless defined(&__builtin_huge_valf32);
		eval 'sub __builtin_inff32 () {
		    eval q(( &__builtin_inff ()));
		}' unless defined(&__builtin_inff32);
		eval 'sub __builtin_nanf32 {
		    my($x) = @_;
    		    eval q(( &__builtin_nanf ($x)));
		}' unless defined(&__builtin_nanf32);
		eval 'sub __builtin_nansf32 {
		    my($x) = @_;
    		    eval q(( &__builtin_nansf ($x)));
		}' unless defined(&__builtin_nansf32);
	    }
	}
	if((defined(&__HAVE_FLOAT64) ? &__HAVE_FLOAT64 : undef)) {
	    if(defined(&__NO_LONG_DOUBLE_MATH)) {
		if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		}
		if(! &__GNUC_PREREQ (7, 0)) {
		    eval 'sub __builtin_huge_valf64 () {
		        eval q(( &__builtin_huge_vall ()));
		    }' unless defined(&__builtin_huge_valf64);
		    eval 'sub __builtin_inff64 () {
		        eval q(( &__builtin_infl ()));
		    }' unless defined(&__builtin_inff64);
		    eval 'sub __builtin_nanf64 {
		        my($x) = @_;
    			eval q(( &__builtin_nanl ($x)));
		    }' unless defined(&__builtin_nanf64);
		    eval 'sub __builtin_nansf64 {
		        my($x) = @_;
    			eval q(( &__builtin_nansl ($x)));
		    }' unless defined(&__builtin_nansf64);
		}
	    } else {
		if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		}
		if(! &__GNUC_PREREQ (7, 0)) {
		    eval 'sub __builtin_huge_valf64 () {
		        eval q(( &__builtin_huge_val ()));
		    }' unless defined(&__builtin_huge_valf64);
		    eval 'sub __builtin_inff64 () {
		        eval q(( &__builtin_inf ()));
		    }' unless defined(&__builtin_inff64);
		    eval 'sub __builtin_nanf64 {
		        my($x) = @_;
    			eval q(( &__builtin_nan ($x)));
		    }' unless defined(&__builtin_nanf64);
		    eval 'sub __builtin_nansf64 {
		        my($x) = @_;
    			eval q(( &__builtin_nans ($x)));
		    }' unless defined(&__builtin_nansf64);
		}
	    }
	}
	if((defined(&__HAVE_FLOAT32X) ? &__HAVE_FLOAT32X : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
	    }
	    if(! &__GNUC_PREREQ (7, 0)) {
		eval 'sub __builtin_huge_valf32x () {
		    eval q(( &__builtin_huge_val ()));
		}' unless defined(&__builtin_huge_valf32x);
		eval 'sub __builtin_inff32x () {
		    eval q(( &__builtin_inf ()));
		}' unless defined(&__builtin_inff32x);
		eval 'sub __builtin_nanf32x {
		    my($x) = @_;
    		    eval q(( &__builtin_nan ($x)));
		}' unless defined(&__builtin_nanf32x);
		eval 'sub __builtin_nansf32x {
		    my($x) = @_;
    		    eval q(( &__builtin_nans ($x)));
		}' unless defined(&__builtin_nansf32x);
	    }
	}
	if((defined(&__HAVE_FLOAT64X) ? &__HAVE_FLOAT64X : undef)) {
	    if((defined(&__HAVE_FLOAT64X_LONG_DOUBLE) ? &__HAVE_FLOAT64X_LONG_DOUBLE : undef)) {
		if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		}
		if(! &__GNUC_PREREQ (7, 0)) {
		    eval 'sub __builtin_huge_valf64x () {
		        eval q(( &__builtin_huge_vall ()));
		    }' unless defined(&__builtin_huge_valf64x);
		    eval 'sub __builtin_inff64x () {
		        eval q(( &__builtin_infl ()));
		    }' unless defined(&__builtin_inff64x);
		    eval 'sub __builtin_nanf64x {
		        my($x) = @_;
    			eval q(( &__builtin_nanl ($x)));
		    }' unless defined(&__builtin_nanf64x);
		    eval 'sub __builtin_nansf64x {
		        my($x) = @_;
    			eval q(( &__builtin_nansl ($x)));
		    }' unless defined(&__builtin_nansf64x);
		}
	    } else {
		if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		}
		if(! &__GNUC_PREREQ (7, 0)) {
		    eval 'sub __builtin_huge_valf64x () {
		        eval q(( &__builtin_huge_valf128 ()));
		    }' unless defined(&__builtin_huge_valf64x);
		    eval 'sub __builtin_inff64x () {
		        eval q(( &__builtin_inff128 ()));
		    }' unless defined(&__builtin_inff64x);
		    eval 'sub __builtin_nanf64x {
		        my($x) = @_;
    			eval q(( &__builtin_nanf128 ($x)));
		    }' unless defined(&__builtin_nanf64x);
		    eval 'sub __builtin_nansf64x {
		        my($x) = @_;
    			eval q(( &__builtin_nansf128 ($x)));
		    }' unless defined(&__builtin_nansf64x);
		}
	    }
	}
	if((defined(&__HAVE_FLOAT128X) ? &__HAVE_FLOAT128X : undef)) {
	    if(! &__GNUC_PREREQ (7, 0) || defined (&__cplusplus)) {
		die("_Float128x supported but no type");
	    }
	    if(! &__GNUC_PREREQ (7, 0)) {
		eval 'sub __builtin_huge_valf128x () {
		    eval q((( &_Float128x)  &__builtin_huge_val ()));
		}' unless defined(&__builtin_huge_valf128x);
		eval 'sub __builtin_inff128x () {
		    eval q((( &_Float128x)  &__builtin_inf ()));
		}' unless defined(&__builtin_inff128x);
		eval 'sub __builtin_nanf128x {
		    my($x) = @_;
    		    eval q((( &_Float128x)  &__builtin_nan ($x)));
		}' unless defined(&__builtin_nanf128x);
		eval 'sub __builtin_nansf128x {
		    my($x) = @_;
    		    eval q((( &_Float128x)  &__builtin_nans ($x)));
		}' unless defined(&__builtin_nansf128x);
	    }
	}
    }
}
1;

${this.title}

Code Editor : floatn-common.ph