Print progress in perform.

bluhm · Sep 12, 2024 · c40d533 · c40d533
1 parent 291fea4
commit c40d533
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/perform.pl b/perform.pl
@@ -1179,12 +1179,14 @@ sub fsmark_finalize {
 );
 
 local $SIG{ALRM} = 'IGNORE';
+my $i = 0;
 TEST:
 foreach my $t (@tests) {
+    printf("test %d/%d\n", ++$i, scalar @tests);
     my @runcmd = @{$t->{testcmd}};
     (my $test = join("_", @runcmd)) =~ s,/.*/,,;
 
-    # reap zombies, might happen it there were some btrace errors
+    # reap zombies, might happen if there were some btrace errors
     1 while waitpid(-1, WNOHANG) > 0;
 
     my $sampletime;