&_assert_finished;

    my IPC::Run $self = shift;

##</code><code>##

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

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