# 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;

Reply via email to