José Valim
485ca72ae2
This also unifies handling of deterministic builds with Erlang/OTP as well as warnings_as_errors.
125 lines
3.4 KiB
Elixir
125 lines
3.4 KiB
Elixir
# Beam files compiled on demand
|
|
path = Path.expand("../../tmp/beams", __DIR__)
|
|
File.rm_rf!(path)
|
|
File.mkdir_p!(path)
|
|
Code.prepend_path(path)
|
|
|
|
Application.put_env(:elixir, :ansi_enabled, true)
|
|
Code.compiler_options(debug_info: true)
|
|
|
|
defmodule PathHelpers do
|
|
def fixture_path() do
|
|
Path.expand("fixtures", __DIR__)
|
|
end
|
|
|
|
def tmp_path() do
|
|
Path.expand("../../tmp", __DIR__)
|
|
end
|
|
|
|
def fixture_path(extra) do
|
|
Path.join(fixture_path(), extra)
|
|
end
|
|
|
|
def tmp_path(extra) do
|
|
Path.join(tmp_path(), extra)
|
|
end
|
|
|
|
def elixir(args, executable_extension \\ "") do
|
|
run_cmd(elixir_executable(executable_extension), args)
|
|
end
|
|
|
|
def elixir_executable(extension \\ "") do
|
|
executable_path("elixir", extension)
|
|
end
|
|
|
|
def elixirc(args, executable_extension \\ "") do
|
|
run_cmd(elixirc_executable(executable_extension), args)
|
|
end
|
|
|
|
def elixirc_executable(extension \\ "") do
|
|
executable_path("elixirc", extension)
|
|
end
|
|
|
|
def iex(args, executable_extension \\ "") do
|
|
run_cmd(iex_executable(executable_extension), args)
|
|
end
|
|
|
|
def iex_executable(extension \\ "") do
|
|
executable_path("iex", extension)
|
|
end
|
|
|
|
def write_beam({:module, name, bin, _} = res) do
|
|
File.mkdir_p!(unquote(path))
|
|
beam_path = Path.join(unquote(path), Atom.to_string(name) <> ".beam")
|
|
File.write!(beam_path, bin)
|
|
res
|
|
end
|
|
|
|
defp run_cmd(executable, args) do
|
|
~c"#{executable} #{IO.chardata_to_string(args)}#{redirect_std_err_on_win()}"
|
|
|> :os.cmd()
|
|
|> :unicode.characters_to_binary()
|
|
end
|
|
|
|
defp executable_path(name, extension) do
|
|
Path.expand("../../../../bin/#{name}#{extension}", __DIR__)
|
|
end
|
|
|
|
if match?({:win32, _}, :os.type()) do
|
|
def windows?, do: true
|
|
def executable_extension, do: ".bat"
|
|
def redirect_std_err_on_win, do: " 2>&1"
|
|
else
|
|
def windows?, do: false
|
|
def executable_extension, do: ""
|
|
def redirect_std_err_on_win, do: ""
|
|
end
|
|
end
|
|
|
|
defmodule CodeFormatterHelpers do
|
|
defmacro assert_same(good, opts \\ []) do
|
|
quote bind_quoted: [good: good, opts: opts] do
|
|
assert IO.iodata_to_binary(Code.format_string!(good, opts)) == String.trim(good)
|
|
end
|
|
end
|
|
|
|
defmacro assert_format(bad, good, opts \\ []) do
|
|
quote bind_quoted: [bad: bad, good: good, opts: opts] do
|
|
result = String.trim(good)
|
|
assert IO.iodata_to_binary(Code.format_string!(bad, opts)) == result
|
|
assert IO.iodata_to_binary(Code.format_string!(good, opts)) == result
|
|
end
|
|
end
|
|
end
|
|
|
|
assert_timeout = String.to_integer(System.get_env("ELIXIR_ASSERT_TIMEOUT") || "500")
|
|
epmd_exclude = if match?({:win32, _}, :os.type()), do: [epmd: true], else: []
|
|
os_exclude = if PathHelpers.windows?(), do: [unix: true], else: [windows: true]
|
|
|
|
{line_exclude, line_include} =
|
|
if line = System.get_env("LINE"), do: {[:test], [line: line]}, else: {[], []}
|
|
|
|
distributed_exclude =
|
|
if Code.ensure_loaded?(:peer) and Node.alive?() do
|
|
{:ok, _pid, node} = :peer.start(%{name: :secondary})
|
|
true = :erpc.call(node, :code, :set_path, [:code.get_path()])
|
|
{:ok, _} = :erpc.call(node, :application, :ensure_all_started, [:elixir])
|
|
[]
|
|
else
|
|
[distributed: true]
|
|
end
|
|
|
|
source_exclude =
|
|
if :deterministic in :compile.env_compiler_options() do
|
|
[:requires_source]
|
|
else
|
|
[]
|
|
end
|
|
|
|
ExUnit.start(
|
|
trace: !!System.get_env("TRACE"),
|
|
assert_receive_timeout: assert_timeout,
|
|
exclude: epmd_exclude ++ os_exclude ++ line_exclude ++ distributed_exclude ++ source_exclude,
|
|
include: line_include
|
|
)
|