=head1 VERSION
-Version 1.12
+Version 1.17
=cut
-our $VERSION = '1.12';
+our $VERSION = '1.17';
=head1 DESCRIPTION
use Scalar::Util ();
-use base qw/Test::Valgrind::Carp/;
+use base qw<Test::Valgrind::Carp>;
=head1 METHODS
=head2 C<new>
+ my $tvc = Test::Valgrind::Component->new;
+
Basic constructor.
=cut
}, $class;
}
-=head2 C<started [ $bool ]>
+=head2 C<started>
+
+ $tvc->started($bool);
Specifies whether the component is running (C<1>), stopped (C<0>) or was never started (C<undef>).
=head2 C<start>
+ $tvc->start;
+
Marks the component as started, and throws an exception if it was already.
Returns its self object.
=head2 C<finish>
+ $tvc->finish;
+
Marks the component as stopped, and throws an exception if it wasn't started.
Returns its self object.
=head1 COPYRIGHT & LICENSE
-Copyright 2009,2010 Vincent Pit, all rights reserved.
+Copyright 2009,2010,2011,2013,2015 Vincent Pit, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.