anchor.diff:  
   let shouldRecord expected grp =
       grp |> run |> ignore
  -    actualCallList() |> should equal expected
  +    actualCallList() |> should (equal expected)
   
   let specs =
       describe "Test runner" [
  
positive.code:                     ctx |> TestContext.getSubject
                      |> withAnExample
                      |> run |> ignore
                      ctx?disposed |> should equal true
  
                  it "is disposed if test fails" <| fun ctx ->
                      ctx |> TestContext.getSubject
                      |> withExampleCode (fun _ -> failwith "dummy")
                      |> run |> ignore
                      ctx?disposed |> should equal true
  
                  it "is disposed if teardown fails" <| fun ctx ->
                      ctx |> TestContext.getSubject
                      |> withTearDownCode (fun _ -> failwith "dummy")
                      |> withAnExample
                      |> run |> ignore
                      ctx?disposed |> should equal true
  
                  it "is not disposed in teardown code" <| fun ctx ->
                      ctx |> TestContext.getSubject
  
negative.code: module FSpec.SelfTests.RunnerSpecs
  open FSpec.Core
  open Dsl
  open MatchersV3
  open ExampleHelper
  
  let callList = ref []
  