Current Path : /usr/lib64/perl5/bits/

Upload File :

Current File : //usr/lib64/perl5/bits/time.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&__need_timeval)) {
    unless(defined(&_BITS_TIME_H)) {
	eval 'sub _BITS_TIME_H () {1;}' unless defined(&_BITS_TIME_H);
	eval 'sub CLOCKS_PER_SEC () {1000000;}' unless defined(&CLOCKS_PER_SEC);
	if(!defined (defined(&__STRICT_ANSI__) ? &__STRICT_ANSI__ : undef)  && !defined (defined(&__USE_XOPEN2K) ? &__USE_XOPEN2K : undef)) {
	    require 'bits/types.ph';
	    eval 'sub CLK_TCK () {(( &__clock_t)  &__sysconf (2));}' unless defined(&CLK_TCK);
	}
	if(defined(&__USE_POSIX199309)) {
	    eval 'sub CLOCK_REALTIME () {0;}' unless defined(&CLOCK_REALTIME);
	    eval 'sub CLOCK_MONOTONIC () {1;}' unless defined(&CLOCK_MONOTONIC);
	    eval 'sub CLOCK_PROCESS_CPUTIME_ID () {2;}' unless defined(&CLOCK_PROCESS_CPUTIME_ID);
	    eval 'sub CLOCK_THREAD_CPUTIME_ID () {3;}' unless defined(&CLOCK_THREAD_CPUTIME_ID);
	    eval 'sub CLOCK_MONOTONIC_RAW () {4;}' unless defined(&CLOCK_MONOTONIC_RAW);
	    eval 'sub CLOCK_REALTIME_COARSE () {5;}' unless defined(&CLOCK_REALTIME_COARSE);
	    eval 'sub CLOCK_MONOTONIC_COARSE () {6;}' unless defined(&CLOCK_MONOTONIC_COARSE);
	    eval 'sub TIMER_ABSTIME () {1;}' unless defined(&TIMER_ABSTIME);
	}
    }
}
if(defined(&__need_timeval)) {
    undef(&__need_timeval) if defined(&__need_timeval);
    unless(defined(&_STRUCT_TIMEVAL)) {
	eval 'sub _STRUCT_TIMEVAL () {1;}' unless defined(&_STRUCT_TIMEVAL);
	require 'bits/types.ph';
    }
}
1;

Copyright 2K16 - 2K18 Indonesian Hacker Rulez