erlang_nif-sys 0.6.4

Create Erlang NIF modules in Rust using the C NIF API.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37


%% dotest.script
%%
%% Compile the test module in-memory and execute it's test function.
%%

source() -> "mynifmod.erl".

main([]) ->
	io:format("Compiling test module ~s\n", [source()]),
	case compile:file(source(), [binary,verbose,report_errors,report_warnings,debug_info]) of
		{ok, Name, Bin} ->
			run_tests(Name, Bin);

		{ok, Name, Bin, Warnings} ->
			show([], Warnings),
			run_tests(Name, Bin);

		error ->
			halt(1);

		{error, Errors, Warnings} ->
			show(Errors, Warnings),
			halt(1)
	end.

run_tests(Name, Bin) ->
	io:format("Running tests in test module ~s\n", [source()]),
	{module, _} = code:load_binary(Name, source(), Bin),
	case Name:test() of
		ok    -> halt(0);
		error -> halt(1)
	end.

show(Errors, Warnings) ->
	io:format("errors = ~p\n", [Errors]),
	io:format("warnings = ~p\n", [Warnings]).