File: 001.phpt

package info (click to toggle)
php8.4 8.4.11-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 208,108 kB
  • sloc: ansic: 1,060,628; php: 35,345; sh: 11,866; cpp: 7,201; pascal: 4,913; javascript: 3,091; asm: 2,810; yacc: 2,411; makefile: 689; xml: 446; python: 301; awk: 148
file content (33 lines) | stat: -rw-r--r-- 664 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
--TEST--
microtime() function
--SKIPIF--
<?php
    if (!function_exists('microtime'))  die('skip microtime() not available');
?>
--FILE--
<?php
$passed = 0;
$failed = 0;
$last_m = 0;
$last_t = 0;
$result = '';

set_time_limit(0);

for ($i=1;$i<=100000;$i++) {
    list($micro,$time)=explode(" ",microtime());
    if ($time > $last_t || ($time == $last_t && $micro >= $last_m)) {
        $passed++;
    } else if ($failed++ <=10) {
        $result .= sprintf('%06d', $i).": $time $micro < $last_t $last_m\n";
    }
    $last_m = $micro;
    $last_t = $time;
}
echo "Passed: $passed\n";
echo "Failed: $failed\n";
echo $result;
?>
--EXPECT--
Passed: 100000
Failed: 0