✏️ 编辑:features-time64.ph
路径:
/usr/lib64/perl5/features-time64.ph
大小:811 B · 修改:2026-09-14 04:10:47 · 权限:0644 · 只读(保存会失败)
← 返回目录
👁 查看
⬇ 下载
require '_h2ph_pre.ph'; no warnings qw(redefine misc); require 'bits/wordsize.ph'; require 'bits/timesize.ph'; if(defined (&_TIME_BITS)) { if((defined(&_TIME_BITS) ? &_TIME_BITS : undef) == 64) { if(! defined (&_FILE_OFFSET_BITS) || (defined(&_FILE_OFFSET_BITS) ? &_FILE_OFFSET_BITS : undef) != 64) { die("_TIME_BITS=64 is allowed only with _FILE_OFFSET_BITS=64"); } elsif((defined(&__TIMESIZE) ? &__TIMESIZE : undef) == 32) { eval 'sub __USE_TIME_BITS64 () {1;}' unless defined(&__USE_TIME_BITS64); } } elsif((defined(&_TIME_BITS) ? &_TIME_BITS : undef) == 32) { if((defined(&__TIMESIZE) ? &__TIMESIZE : undef) > 32) { die("_TIME_BITS=32 is not compatible with __TIMESIZE > 32"); } } else { die("Invalid\ _TIME_BITS\ value\ \(can\ only\ be\ 32\ or\ 64\-bit\)"); } } 1;
💾 保存
取消
保存为 UTF-8,换行统一为 LF