projects / platform / upstream / perl.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 3857d07) | patch
Actually generate full failure diagnostics in checkErrs() in B's OptreeCheck,
authorNicholas Clark <nick@ccl4.org>
Fri, 4 Feb 2011 16:59:42 +0000 (16:59 +0000)
committerNicholas Clark <nick@ccl4.org>
Fri, 4 Feb 2011 16:59:42 +0000 (16:59 +0000)
commit3df2ec53a8bebf2834a6148ee2f3453fdc73fd66
treea0d1b21afd135fb29d931bafa7d7c0e295d04707tree | snapshot
parent3857d07c85882fa81d5e5c1ce2867e8c957747d0commit | diff
Actually generate full failure diagnostics in checkErrs() in B's OptreeCheck,

3857d07c85882fa8 used if() where unless() would have been correct. However, I
didn't spot this because

a: none of the tests fail so none are trying to generate diagnostics
b: the code as written is silent if there are no errors

Hence make the code be called unconditionally, which simplifies things.

Remove the vestigial forced fail() if $gOpts{fail} is true.
ext/B/t/OptreeCheck.pm diff | blob | history
Domain: System / Base;