1
package TestAPR::brigade;
4
use warnings FATAL => 'all';
9
use Apache::RequestRec ();
12
use Apache::Const -compile => 'OK';
20
# simple constructor and accessor tests
22
my $bb = APR::Brigade->new($r->pool, $r->connection->bucket_alloc);
24
t_debug('$bb is defined');
27
t_debug('$bb ISA APR::Brigade object');
28
ok $bb->isa('APR::Brigade');
32
t_debug('$pool is defined');
35
t_debug('$pool ISA APR::Pool object');
36
ok $pool->isa('APR::Pool');