# New Ticket Created by "brian d foy"
# Please include the string: [perl #130920]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=130920 >
This is the example from the Tap docs. I expect the output to be
"Tap closed", but I get no output using 2017.01:
my $s = Supplier.new;
my $tap = $s.Supply.tap(
-> $v { say "the value is $v" },
done => { say "Supply is done" },
closing => { say "Tap closed" },
quit => -> $ex { say "Supply finished with error $ex" },
);
# later
$tap.close;