### ----------------------------------------------------
### -- PSpec
### -- Licenses: Artistic-2.0
### -- Authors: 
### -- File: t/basic.rakutest
### ----------------------------------------------------
use Test;
use PSpec;

plan 5;

describe "PSpec", "operators",
[
    'eq' => { 20 should eq(20) },
    'gt' => { 20 should gt(15) },
    'lt' => { 20 should lt(25) }
];

describe "PSpec", "helpers", 
[
    'times' => {
        my $value = 0;
        20 times { $value++ }
        $value, 20;
    },
    'xxx' => {
        my $value = 50;
        { $value--; } xxx 25;
        $value, 25;
    }
];

# vim: expandtab shiftwidth=4


