Added more rewriter function heads

bryanjos · bryanjos · commit 6bf134cac647 · 2016-02-09T12:00:16.000-06:00
diff --git a/.gitignore b/.gitignore
@@ -17,3 +17,4 @@ fprof.trace
 index.js
 /doc
 /bench/snapshots
+.tern-port
diff --git a/lib/elixir_script/translator/rewriter.ex b/lib/elixir_script/translator/rewriter.ex
@@ -297,6 +297,25 @@ defmodule ElixirScript.Translator.Rewriter do
     quote do: true
   end
 
+  def rewrite({{:., _, [:erlang, :make_tuple]}, _, [size, data]}) do
+    quote do: JS.new(Elixir.Core.Tuple, List.duplicate(unquote(size), unquote(data)))
+  end
+
+  def rewrite({{:., _, [:erlang, :insert_element]}, _, [index, tuple, term]}) do
+    quote do: unquote(tuple).put_elem(unquote(index) - 1, unquote(term))
+  end
+
+  def rewrite({{:., _, [:erlang, :tuple_to_list]}, _, [tuple]}) do
+    quote do: unquote(tuple).values
+  end
+
+  def rewrite({{:., _, [:erlang, :append_element]}, _, [tuple, value]}) do
+    quote do: unquote(tuple).put_elem(unquote(tuple).length, unquote(value))
+  end
+
+  def rewrite({{:., _, [:erlang, :delete_element]}, _, [index, tuple]}) do
+    quote do: unquote(tuple).remove_elem(unquote(index))
+  end
 
   def rewrite({{:., _, [:lists, :map]}, _, [fun, list]}) do
     quote do: unquote(list).map(unquote(fun))
diff --git a/src/javascript/lib/core/primitives.js b/src/javascript/lib/core/primitives.js
@@ -30,9 +30,20 @@ class Tuple {
   }
 
   put_elem(index, elem){
-      let new_values = this.values.concat([]);
-      new_values.splice(index, 0, elem);
+    if(index === this.length){
+      let new_values = this.values.concat([elem]);
       return new Tuple(...new_values);
+    }
+
+    let new_values = this.values.concat([]);
+    new_values.splice(index, 0, elem);
+    return new Tuple(...new_values);
+  }
+
+  remove_elem(index){
+    let new_values = this.values.concat([]);
+    new_values.splice(index, 1);
+    return new Tuple(...new_values);
   }
 
 }
diff --git a/test/elixir_script_test.exs b/test/elixir_script_test.exs
@@ -181,5 +181,4 @@ defmodule ElixirScript.Test do
        };
      """, hd(js_code)
   end
-
 end

-Original file line number
+Diff line change
        };
      """, hd(js_code)
   end
+-
 end