fuzz-test-failures* ( trials generator: ( -- ..a ) predicate: ( ..a -- ? ) -- failures )


Vocabulary
tools.test.fuzz

Inputs
trialsan object
generatoran object
predicatean object


Outputs
failuresan object


Word description
Similar to fuzz-test, but with a number of trials specified. Returns a list of failing inputs generated by the generator quotation.

Definition
USING: combinators.smart kernel sequences ;

IN: tools.test.fuzz

: fuzz-test-failures*
( trials generator: ( -- ..a ) predicate: ( ..a -- ? ) -- failures )
[ input<sequence ] curry
[ [ { } output>sequence ] curry ] dip
[ [ f swap ? ] bi ] curry compose replicate sift ; inline