anchor.diff:      withDatabase (fun conn ->
           let conn = Sql.withConnection conn
           dataReaderWithLazyList conn)
  -
   (*
   [<Test>]
   let ``datareader with lazylist persistent`` () =
       dataReaderWithLazyList (withNewDbFile())
  -    *)+*)
positive.code:         let conn = Sql.withConnection conn
          dataReaderIsParallelizable conn)
  
  [<Test>]
  let ``datareader is parallelizable persistent``() =
      dataReaderIsParallelizable(withNewDbFile())
  
  let dataReaderToSeqIsForwardOnly conn =
      insertUsers conn
  
negative.code: let insertUsers conn =
      log "inserting"
      let insert conn () =
          //for i in 100000000..100050000 do
          for i in 1..10 do
              insertUser conn {id = i; name = "pepe" + i.ToString(); address = None}
      let insert = Sql.transactionalWithIsolation IsolationLevel.ReadCommitted conn insert
      insert()
  