### ----------------------------------------------------
### -- List::MoreUtils
### -- Licenses: Artistic-2.0
### -- Authors: Elizabeth Mattijsen
### -- File: t/firstres.rakutest
### ----------------------------------------------------
use Test;
use List::MoreUtils <firstres first_result>;

plan 4;

ok &firstres =:= &first_result, 'is firstres the same as first_result';

is firstres( { 2 * $_ if $_ > 5 }, (4 .. 9) ), 12, "right first result";
is firstres( { $_ > 3 }, (1 .. 4) ), True, 'did we get boolean result';
is firstres( { $_ > 5 }, (1 .. 4) ), Nil, 'did we get no result';

# vim: expandtab shiftwidth=4


