fix "useless use" in import arguments

rakudo · Apr 8, 2016 · a3b8fef · a3b8fef
1 parent a93edd9
commit a3b8fef
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
@@ -1733,6 +1733,10 @@ class Perl6::Actions is HLL::Actions does STDActions {
     }
 
     method statement_control:sym<import>($/) {
+        # NB: Grammar already passed arglist directly to World, but this seems soon enough to want it.
+        if $<arglist> {
+            WANTED($<arglist><EXPR>.ast, 'import');
+        }
         my $past := QAST::WVal.new( :value($*W.find_symbol(['Nil'])) );
         make $past;
     }