Current section
Files
Jump to
Current section
Files
lib/zig/nif/test.ex
defmodule Zig.Nif.Test do
@moduledoc """
Adapter code for test nifs.
"""
alias Zig.Nif.Adapter
@behaviour Adapter
@impl true
def zig_adapter(nif) do
# when it is a test:
"""
export fn __#{Adapter.shim_name nif.name}_shim__(env: beam.env, argc: c_int, argv: [*c] const beam.term) beam.term {
beam.test_env = env;
#{nif.name}() catch return beam.test_error();
return beam.make_atom(env, "ok");
}
"""
end
@impl true
def nif_table_entries(nif) do
"""
e.ErlNifFunc{
.name = "#{nif.test}",
.arity = 0,
.fptr = __#{Adapter.shim_name nif.name}_shim__,
.flags = 0,
},
"""
end
@impl true
def beam_adapter(nif) do
raise_msg = "nif for test #{nif.test} not found"
raise_code = quote do
raise unquote(raise_msg)
end
{:def, [context: Elixir, import: Kernel],
[
{nif.test, [context: Elixir], Elixir},
[do: raise_code]
]}
end
end