About

šŸ” āŒ˜K/ctrl-K

Test::Fuzz

Generative Testing

Test::Fuzz

This module performs generative testing on Raku functions.

INSTALL

Install with:

zef install Test::Fuzz

Synopsis

use Test::Fuzz;

sub bla(Int $bla, Int $ble --> UInt) is fuzzed {
    $bla + $ble
}

sub ble(Int $ble) is fuzzed {
    die "it is prime!" if $ble.is-prime
}

sub bli(Str :$bli) is fuzzed {
    die "it's too long" unless $bli.chars < 10
}

sub blo("test") is fuzzed {
    "ok"
}

sub blu(Str $blu) {
    "ok";
}

fuzz &blu;

multi MAIN(Bool :$fuzz!) {
    run-tests
}

Description

Test::Fuzz is a tool for fuzzing or generative/fuzz testing.

Add the is fuzzed trait to a method or function and Test::Fuzz will try to figure out the best generators to use to test your function. If the function was already created without this trait, pass it to the fuzz function for the same effect.

To run the tests, just call the run-tests function.

INSTALLATION

    # with zef
    > zef install Test::Fuzz

    # or, with 6pm (https://github.com/FCO/6pm)
    > $ 6pm install Test::Fuzz

multi sub trait_mod:

multi sub trait_mod:<is>(
    Routine $func,
    :$fuzzed! (Any :$returns, :&test) where { ... }
) returns Mu

trait is fuzzed can receive params :returns and :test

multi sub trait_mod:

multi sub trait_mod:<is>(
    Routine $func,
    Bool :$fuzzed!
) returns Mu

trait is fuzzed

sub fuzz

sub fuzz(
    &func
) returns Mu

fuzz an existing sub

sub run-tests

sub run-tests(
    @funcs = Code.new,
    Int :$runs
) returns Nil

function that run fuzzed tests

class Mu $

if no specified the functions, it runs all fuzzed tests

The Camelia image is copyright 2009 by Larry Wall. "Raku" is a trademark of the Yet Another Society. All rights reserved.

Built with Podlite ā€” the markup and publishing tools behind this site.