Restore check that was accidentally removed

rakudo · Jul 10, 2018 · 08a5421 · 08a5421
1 parent d6c0539
commit 08a5421
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Perl6/Optimizer.nqp b/src/Perl6/Optimizer.nqp
@@ -2235,7 +2235,8 @@ class Perl6::Optimizer {
         # (Check the following after we've checked children, since they may have useless bits too.)
 
         # Any literal in void context deserves a warning.
-        if $!void_context && +@($want) == 3 && $want.node {
+        if $!void_context && +@($want) == 3 && $want.node
+           && !$want.ann('sink-quietly') {
             my str $warning;
             my $no-sink;