Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
25 lines (21 sloc) 616 Bytes
#!/usr/local/bin/escript
%% -*- erlang -*-
%%! -pa ../excavator -pa ebin -sasl errlog_type error -boot start_sasl -noshell
main(_) ->
etap:plan(unknown),
case (catch start()) of
{'EXIT', Err} ->
io:format("# ~p~n", [Err]),
etap:bail();
_ ->
etap:end_tests()
end,
ok.
start() ->
error_logger:tty(false),
application:start(inets),
application:start(excavator),
test_server:start_link(),
Instrs = ex_pp:parse("templates/function_tests.ex", []),
etap:is(ex_engine:run(Instrs), "abc", "function test passes"),
ok.