/**
* @dataProvider provideData
*/
public function test_it_should_filter_with_maybe($list, $expected)
{
$filter = function ($i) {
return new Just($i % 2 == 1);
};
$this->assertEquals($expected, f\filterM($filter, $list)->extract());
}
public function test_it_should_filter_with_logs()
{
$data = [1, 10, 15, 20, 25];
$filter = function ($i) {
if ($i % 2 == 1) {
return W::of(false, S::of("Reject odd number {$i}.\n"));
} elseif ($i > 15) {
return W::of(false, S::of("Reject {$i} because it is bigger than 15\n"));
}
return W::of(true);
};
list($result, $log) = f\filterM($filter, $data)->runWriter();
$this->assertEquals([10], $result);
$this->assertEquals('Reject odd number 1.
Reject odd number 15.
Reject 20 because it is bigger than 15
Reject odd number 25.
', $log->extract());
}
