Skip to content

Commit

Permalink
Add note about pausing to allow bc to process
Browse files Browse the repository at this point in the history
  • Loading branch information
briandfoy committed Jun 17, 2023
1 parent 6dbef28 commit f154b00
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion t/bc/ipc-open3.t
Expand Up @@ -10,7 +10,6 @@ use IO::Select;

my $program = 'bin/bc';


foreach my $table ( operator_table(), precedence_table(), special_expr_table(), statement_table() ) {
my $label = shift @$table;
subtest $label => sub {
Expand Down Expand Up @@ -38,6 +37,9 @@ sub run_bc {
my %hash;
foreach my $line ( split /\n/, $input ) {
print {$child_in} $line, "\n";

# give the child process a chance to work, otherwise we
# will check its filehandles too soon.
select(undef,undef,undef,0.2);

if( $select_err->can_read(0) ) {
Expand Down

0 comments on commit f154b00

Please sign in to comment.