handle for inner ignore exception fixes #313

haf · Apr 3, 2019 · 03e9cad · 03e9cad
1 parent 743bac3
commit 03e9cad
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 1 deletion.
diff --git a/Expecto.Tests/Tests.fs b/Expecto.Tests/Tests.fs
@@ -1256,6 +1256,10 @@ let taskTests =
         let! m = Task.FromResult (3*n)
         Expect.equal m 6 "m=6"
     } |> assertTestFails
+
+    testTask "inner skip" {
+      skiptest "skipped"
+    }
   ]
 
 [<Tests>]

diff --git a/Expecto/Expecto.fs b/Expecto/Expecto.fs
@@ -981,7 +981,10 @@ module Impl =
           return TestSummary.single (Ignored e.Message) (float w.ElapsedMilliseconds)
         | :? AggregateException as e when e.InnerExceptions.Count = 1 ->
           w.Stop()
-          return TestSummary.single (Error e.InnerException) (float w.ElapsedMilliseconds)
+          if e.InnerException :? IgnoreException then
+            return TestSummary.single (Ignored e.InnerException.Message) (float w.ElapsedMilliseconds)
+          else
+            return TestSummary.single (Error e.InnerException) (float w.ElapsedMilliseconds)
         | e ->
           w.Stop()
           return TestSummary.single (Error e) (float w.ElapsedMilliseconds)