| Current Path : /usr/local/lib/perl5/site_perl/5.8.9/mach/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
| Current File : //usr/local/lib/perl5/site_perl/5.8.9/mach/complex.ph |
require '_h2ph_pre.ph';
no warnings 'redefine';
unless(defined(&_COMPLEX_H)) {
eval 'sub _COMPLEX_H () {1;}' unless defined(&_COMPLEX_H);
if(defined(&__GNUC__)) {
if((defined(&__STDC_VERSION__) ? &__STDC_VERSION__ : undef) < 199901) {
eval 'sub _Complex () { &__complex__;}' unless defined(&_Complex);
}
eval 'sub _Complex_I () {((\'float\' &_Complex)1.0 &i);}' unless defined(&_Complex_I);
}
eval 'sub complex () { &_Complex;}' unless defined(&complex);
eval 'sub I () { &_Complex_I;}' unless defined(&I);
require 'sys/cdefs.ph';
}
1;