Merge pull request #617 from kbucheli/properly_close_channel_supply

channel elements not yet consumed in the supply should still be accessible
Raku · Feb 11, 2020 · e4ffee2 · e4ffee2
2 parents ebf9054 + b458b1d
commit e4ffee2
Showing 1 changed file with 11 additions and 1 deletion.
diff --git a/S17-channel/basic.t b/S17-channel/basic.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 27;
+plan 28;
 
 {
     my Channel $c .= new;
@@ -94,6 +94,16 @@ plan 27;
     $timer.close;
 }
 
+{
+    my $c = Channel.new;
+    $c.send(1);
+    $c.send(2);
+
+    react whenever $c { done }
+
+    is $c.poll, 2, 'second value should still be in the channel';
+}
+
 { # coverage; 2016-09-26
     throws-like { Channel.elems     }, Exception, 'Channel:U.elems fails';
     throws-like { Channel.new.elems }, Exception, 'Channel:D.elems fails';