Select Code to Download

    sub mytool {
      my $ctx = context();
...
      $ctx->diag(...);
      $ctx->release; # This is where the bail-on-fail is triggered
    }

    sub mytool {
      $tb->ok(...); # BailOnFail is triggered here
      $tb->diag(...); # Lost
    }