From 3f5fa807cb86f3c756933c1f59f4444d1ea17bbb Mon Sep 17 00:00:00 2001 From: Tristan Sloughter Date: Sat, 7 Mar 2015 13:29:26 -0600 Subject: update erlydtl compiler to output to _build, add simple test --- test/rebar_erlydtl_SUITE.erl | 72 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 72 insertions(+) create mode 100644 test/rebar_erlydtl_SUITE.erl (limited to 'test/rebar_erlydtl_SUITE.erl') diff --git a/test/rebar_erlydtl_SUITE.erl b/test/rebar_erlydtl_SUITE.erl new file mode 100644 index 0000000..c9054fd --- /dev/null +++ b/test/rebar_erlydtl_SUITE.erl @@ -0,0 +1,72 @@ +%% -*- erlang-indent-level: 4;indent-tabs-mode: nil -*- +%% ex: ts=4 sw=4 et +-module(rebar_erlydtl_SUITE). + +-export([suite/0, + init_per_suite/1, + end_per_suite/1, + init_per_testcase/2, + end_per_testcase/2, + all/0, + compile/1]). + +-include_lib("common_test/include/ct.hrl"). +-include_lib("eunit/include/eunit.hrl"). +-include_lib("kernel/include/file.hrl"). + +%% =================================================================== +%% common_test callbacks +%% =================================================================== + +suite() -> + []. + +init_per_suite(Config) -> + Config. + +end_per_suite(_Config) -> + ok. + + +init_per_testcase(_, Config) -> + UpdConfig = rebar_test_utils:init_rebar_state(Config), + AppDir = ?config(apps, UpdConfig), + + Name = rebar_test_utils:create_random_name("erlydtlapp_"), + Vsn = rebar_test_utils:create_random_vsn(), + rebar_test_utils:create_app(AppDir, Name, Vsn, [kernel, stdlib]), + + write_dtl_file(AppDir, Name), + + RebarConfig = [{erl_opts, [debug_info]}, + {erlydtl_opts, []}], + [{app_name, Name}, + {rebar_config, RebarConfig} | UpdConfig]. + +end_per_testcase(_, _Config) -> + ok. + +all() -> + [compile]. + +compile(Config) -> + AppDir = ?config(apps, Config), + AppName = ?config(app_name, Config), + RebarConfig = ?config(rebar_config, Config), + Beam = beam_file(AppDir, AppName), + rebar_test_utils:run_and_check( + Config, RebarConfig, ["erlydtl", "compile"], + {ok, [{file, Beam}]} + ). + +beam_file(AppDir, AppName) -> + filename:join([AppDir, "_build", "default", "lib", + AppName, "ebin", AppName++"_template_dtl.beam"]). + +write_dtl_file(Dir, AppName) -> + Erl = filename:join([Dir, "priv", "templates", AppName++"_template.dtl"]), + ok = filelib:ensure_dir(Erl), + ok = ec_file:write(Erl, get_body()). + +get_body() -> + ["[]"]. -- cgit v1.1