anchor.diff:  open FsSqlPrelude
   open Microsoft.FSharp.Collections
   open Microsoft.FSharp.Reflection
  +
  +let P = Sql.Parameter.make
   
   [<Test>]
   let catchtest() =
  
positive.code: let ``async exec reader`` () = 
      let cmgr = withNewDbFile()
      async {
          use! reader = Sql.asyncExecReader cmgr "select * from person where id < @id" [Sql.Parameter.make("@id", 0)]
          let r = reader |> List.ofDataReader
          Assert.AreEqual(0, r.Length)
      } |> Async.RunSynchronously
  
negative.code:     let cmgr = withNewDbFile()
      use cmd = Sql.createCommand cmgr
      cmd.CommandText <- "select * from person where id < @id"
      [P("@id", 0)] |> Seq.iter (Sql.addParameter cmd)
      let r = cmd.ExecuteReader() |> List.ofDataReader
      Assert.AreEqual(0, r.Length)
  
  