Support and-op assignments using bracket reference

adambeynon · adambeynon · commit d2520d20962d · 2014-06-17T17:56:54.000+01:00
diff --git a/lib/opal/nodes/call_special.rb b/lib/opal/nodes/call_special.rb
@@ -39,7 +39,7 @@ def compile
         sexp = s(:or, recvr, rhs)
         push expr(sexp)
       end
-    end 
+    end
 
     # a &&= rhs
     # s(:op_asgn_and, s(:lvar, :a), s(:lasgn, a:, rhs))
@@ -98,6 +98,19 @@ def compile_or
           end
         end
       end
+
+      def compile_and
+        with_temp do |a| # args
+          with_temp do |r| # recv
+            aref = s(:call, s(:js_tmp, r), :[], s(:arglist, s(:js_tmp, a)))
+            aset = s(:call, s(:js_tmp, r), :[]=, s(:arglist, s(:js_tmp, a), rhs))
+            andop = s(:and, aref, aset)
+
+            push "(#{a} = ", expr(first_arg), ", #{r} = ", expr(lhs)
+            push ", ", expr(andop), ")"
+          end
+        end
+      end
     end
 
     # lhs.b += rhs
