In CheckReporter, also display summary at top

[hadley]

This is useful when look at the full results in CI

[gaborcsardi]

Should we add some optimization to avoid showing the summary twice if there is no other output? I.e. if there are no skips, warnings, errors, etc. at all?

[hadley]

I thought about that but couldn't be bothered since it seems unlikely to come up that much.

[gaborcsardi]

It comes up for every clean test run, no?

Not a big deal, just weird to have this duplication.

> library(testthat)
> library(pingr)
>
>  test_check("pingr")
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 21 ]

[ FAIL 0 | WARN 0 | SKIP 0 | PASS 21 ]
>
> proc.time()
   user  system elapsed
  0.297   0.085   3.724

[hadley]

Oh I see what you mean. I guess I was just thinking about the actions, where you only ever look at this display if there are test failures.

[hadley]

I'll fix momentarily (if (self$skips$size() || self$warnings$size() || self$problems$size()))