Help for this page

Select Code to Download

Select or download this

    &_assert_finished;

    my IPC::Run $self = shift;

Select or download this

sub _assert_finished {
    my IPC::Run $self = $_[0];

    croak "Harness not run" unless $self->{STATE} >= _finished;
    croak "Harness not finished running" unless $self->{STATE} == _fin
+ished;
}