Codebase list libcapture-tiny-perl / 6aaab47
add tests for empty/no output David Golden 12 years ago
1 changed file(s) with 8 addition(s) and 0 deletion(s). Raw diff Collapse all Expand all
7777 both => {
7878 output => sub { _binmode($_[0]) . "print STDOUT qq{STDOUT:$texts{$_[0]}}; print STDERR qq{STDERR:$texts{$_[0]}}" },
7979 expect => sub { eval "qq{STDOUT:$texts{$_[0]}}", eval "qq{STDERR:$texts{$_[0]}}" },
80 },
81 empty => {
82 output => sub { _binmode($_[0]) . "print STDOUT qq{}; print STDERR qq{}" },
83 expect => sub { "", "" },
84 },
85 nooutput=> {
86 output => sub { _binmode($_[0]) },
87 expect => sub { "", "" },
8088 },
8189 );
8290