2

プロパティ ベースのテスト スイートに構成を適用するにはどうすればよいですか?

私は次のことを試しました：

let config = { Config.Quick with MaxTest = 10000
                                 QuietOnSuccess = true }

[<Property(Config=config)>] // Doesn't work because "Config" is a private member
let ``my property-based test`` () =
   ...

ただし、Configメンバーはプライベートに設定されており、コンパイルされません。

助言がありますか？

4

1 に答える 1

4

に設定MaxTestする場合は、次のプロパティ10000を使用します。MaxTest

[<Property(MaxTest = 10000, QuietOnSuccess = true)>]
let ``my property-based test`` () =
   // ...

これが DRY の原則に違反し、すべてのプロパティに対してそれを入力する必要があると思われる場合は、派生属性を作成できます。

type MyPropertyAttribute() =
    inherit PropertyAttribute(
        MaxTest = 10000,
        QuietOnSuccess = true)

次に、代わりにプロパティでその属性を使用します。

[<MyProperty>]
let ``my property-based test`` () =
   // ...
于 2016-08-11T15:14:49.927 に答える