Remove bogus defined test in sink handling.

This means that Failure is now correctly sunk.
rakudo · Jan 10, 2013 · 8ca20db · 8ca20db
1 parent 45c445a
commit 8ca20db
Showing 1 changed file with 3 additions and 8 deletions.
diff --git a/src/Perl6/Actions.pm b/src/Perl6/Actions.pm
@@ -59,14 +59,9 @@ class Perl6::Actions is HLL::Actions does STDActions {
                         QAST::Op.new(:op<isconcrete>,
                             QAST::Var.new(:$name, :scope<local>),
                         ),
-                        QAST::Op.new(:op<if>,
-                            QAST::Op.new(:op<can>,
-                                QAST::Var.new(:$name, :scope<local>),
-                                QAST::SVal.new(:value('sink')),
-                            ),
-                            QAST::Op.new(:op<defined>,
-                                QAST::Var.new(:$name, :scope<local>),
-                            )
+                        QAST::Op.new(:op<can>,
+                            QAST::Var.new(:$name, :scope<local>),
+                            QAST::SVal.new(:value('sink')),
                         )
                     ),
                     QAST::Op.new(:op<callmethod>, :name<sink>,