anchor.diff:      logf "%d primes" primes
   
   
  -[<Test>]
  -
  +[<Test;Parallelizable>]
   let ``datareader is parallelizable`` () =
       withDatabase (fun conn ->
           let conn = Sql.withConnection conn
  
positive.code:         printfn "%d" (i?id).Value
      printfn "end!"
  
  [<Test>]
  
  let ``get many``() =
      withDatabase (fun conn ->
          let conn = Sql.withConnection conn
  
negative.code:     someTran()
      Assert.AreEqual(2L, countUsers conn)
  
  [<Test;Parallelizable>]
  let ``transaction committed`` () =
      withDatabase (fun conn ->
          let conn = Sql.withConnection conn
  