Quick script to compare which tests are passing/failing between base and changes

compare-test-outputs.raku

#!/usr/bin/env raku

sub MAIN($file-a, $file-b) {
    my $set-a = $file-a.IO.lines;
    say "{$set-a.elems} passing tests in $file-a";
    my $set-b = $file-b.IO.lines;
    say "{$set-b.elems} passing tests in $file-b";

    # Symmetric difference doesn't account for what is missing from where.. 
    # we may pass tests in A that fail in B, but also tests in B that pass in B but fail in A
    #my $diff = $set-a (^) $set-b;
    #say "{$diff.elems} difference in passing tests";
    #$diff.keys.join("\n").say;

    my $diff-left = $set-a (-) $set-b;
    say "{$diff-left.elems} tests passed in '$file-a' but failed in '$file-b'";
    $diff-left.keys.join("\n\t").say;

    my $diff-right = $set-b (-) $set-a;
    say "{$diff-right.elems} tests passed in '$file-b' but failed in '$file-a'";
    $diff-right.keys.join("\n\t").say;
}