File: 00_load.t

package info (click to toggle)
libio-aio-perl 4.81-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 988 kB
  • sloc: ansic: 5,008; perl: 603; makefile: 11; sh: 2
file content (10 lines) | stat: -rw-r--r-- 203 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
 
BEGIN { $| = 1; print "1..3\n"; }
END {print "not ok 1\n" unless $loaded;}
use IO::AIO;
$loaded = 1;
print "ok 1\n";
IO::AIO::min_parallel(10);
print "ok 2\n";
IO::AIO::max_parallel(0);
print "ok 3\n";