Pass test 26.

Fix handling of $foo."$method".
pmurias · Dec 1, 2014 · c464545 · c464545
1 parent b97120f
commit c464545
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 6 deletions.
diff --git a/src/vm/js/QAST/Compiler.nqp b/src/vm/js/QAST/Compiler.nqp
@@ -517,11 +517,9 @@ class QAST::OperationsJS {
                 $method := '[' ~ quote_string($node.name) ~ ']';
             }
         } else {
-            my $method := $comp.as_js(@args.shift, :want($T_STR));
-            my $tmp := $*BLOCK.add_tmp();
-            @setup.push($method);
-            @setup.push("$tmp := {$method.expr};\n");
-            $method := "[$tmp]";
+            my $method_name := $comp.as_js(@args.shift, :want($T_STR));
+            @setup.push($method_name);
+            $method := "[{$method_name.expr}]";
         }
 
         my $compiled_args := $comp.args(@args);

diff --git a/src/vm/js/bin/run_tests b/src/vm/js/bin/run_tests
@@ -1,5 +1,5 @@
 #!/bin/bash
 # 19 and 30 where moved out as they were parrot specific, 52,54 is missing, we can't pass 49 till we are bootstraped
 #echo 'No tests pass as we are in the early stages of a rewrite/refactor'
-prove -e  './nqp-js' t/nqp/{01..17}* t/nqp/{20,22,23,25,36,37,38,40,41,42,46,48,53,59,63,68,81,83}* t/js/getcomp-js.t
+prove -e  './nqp-js' t/nqp/{01..17}* t/nqp/{20,22,23,25,26,36,37,38,40,41,42,46,48,53,59,63,68,81,83}* t/js/getcomp-js.t
 #prove -e  './nqp-js' t/nqp/{01..29}*.t t/nqp/{31..48}* t/nqp/{50,51,53}* t/nqp/{55..81}* t/nqp/83* t/serialization/0{2,3}*.t