Merge pull request #2545 from ucsd-progsys/fd/constraints-on-failure

Print the amount of checked constraints when verification fails

Author: facundominguez

liquidhaskell-boot/src/Language/Haskell/Liquid/UX/CmdLine.hs

@@ -842,9 +842,9 @@ resDocs k (F.Crash xs s)  =
     orHeader = text "LIQUID: ERROR:" <+> text s
   , orMessages = map (cErrToSpanned k . errToFCrash) xs
   }
-resDocs k (F.Unsafe _ xs)   =
+resDocs k (F.Unsafe stats xs)   =
   OutputResult {
-    orHeader   = text "LIQUID: UNSAFE"
+    orHeader   = text $ "LIQUID: UNSAFE (" <> show (Solver.numChck stats) <> " constraints checked)"
   , orMessages = map (cErrToSpanned k) (nub xs)
   }