Add manifest test

bryanjos · bryanjos · commit 016c77497ede · 2017-11-11T07:52:57.000-06:00
diff --git a/lib/elixir_script/manifest.ex b/lib/elixir_script/manifest.ex
@@ -9,7 +9,7 @@ defmodule ElixirScript.Manifest do
   @spec write_manifest(binary, map) :: :ok
   def write_manifest(manifest_path, modules) do
     data = Enum.reduce(modules, %{}, fn {module, info}, current_data ->
-      Map.put(current_data, module, Map.drop(info, :js_code))
+      Map.put(current_data, module, Map.drop(info, [:js_code]))
     end)
 
     data = :erlang.term_to_binary(data, [:compressed])
diff --git a/test/manifest_test.exs b/test/manifest_test.exs
@@ -0,0 +1,12 @@
+defmodule ElixirScript.Manifest.Test do
+  use ExUnit.Case
+  alias ElixirScript.Manifest
+
+  test "write manifest" do
+    result = ElixirScript.Compiler.compile(Atom)
+    path = Path.join([System.tmp_dir(), "write_manifest_test", ".compile.elixir_script"])
+    Manifest.write_manifest(path, result)
+    assert File.exists?(path)
+  end
+
+end
