anchor.diff:                  }
       ]
   
  -    member internal __.GetExecuteArgsForSqlParameters(providedCommandType, sqlParameters, allParametersOptional) = [
  +    member internal __.GetExecuteArgsForSqlParameters(cmdProvidedType, sqlParameters, allParametersOptional) = [
           for p in sqlParameters do
               assert p.Name.StartsWith("@")
               let parameterName = p.Name.Substring 1
  
positive.code:            if watcher <> null
             then try watcher.Dispose() with _ -> ()
  
      member internal this.CreateType((typeName, commandText : string, connectionStringOrName : string, resultType : ResultType, singleRow : bool, configFile : string, allParametersOptional : bool) as key) = 
          
          let resolutionFolder = config.ResolutionFolder
  
          let invalidator () =
              cache.TryRemove(key) |> ignore 
              this.Invalidate()
          let commandText, watcher' = Configuration.ParseTextAtDesignTime(commandText, resolutionFolder, invalidator)
          watcher' |> Option.iter (fun x -> watcher <- x)
  
          if connectionStringOrName.Trim() = ""
  
negative.code:             let vals = mappedParamValues(exprArgs)
              let paramValues = Expr.NewArray(typeof<string*obj>, elements = vals)
              Expr.Call( Expr.Coerce(exprArgs.[0], erasedType), methodCall, [paramValues])
          cmdProvidedType.AddMember executeMethod
         
  
      member internal __.GetOutputTypes(outputColumns, resultType, singleRow) =    
          if resultType = ResultType.DataReader 
          then 
              {
  