[perl #124074] Closing a Channel on which a worker is receiving may or may not trigger a X::Channel::ReceiveOnDone exception

[via RT]

# New Ticket Created by  Rob Hoelz 
# Please include the string:  [perl #124074]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=124074 >


The attached program blocks indefinitely 42/100 times, throws an odd 
typechecking exception 6/100 times, and throws the correct exception 
(X::Channel::ReceiveOnDone) 52/100 times.

closed-channel.p6
Description: Binary data