File: 00_load.t

package info (click to toggle)
libio-aio-perl 2.4-1
  • links: PTS
  • area: main
  • in suites: lenny, squeeze
  • size: 356 kB
  • ctags: 76
  • sloc: perl: 413; ansic: 97; makefile: 50
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";