diff options
author | Dave Smith <dizzyd@dizzyd.com> | 2010-06-08 14:51:49 -0600 |
---|---|---|
committer | Dave Smith <dizzyd@dizzyd.com> | 2010-06-08 14:51:49 -0600 |
commit | 1df2b6d41c9d771fea8e623090336188406db7a5 (patch) | |
tree | 646191058e5175d74094ba57ca08e2665216f6bc /inttest/tdeps1 | |
parent | a2f1b62d74e2133321bf7255d4ae5017d58b8b20 (diff) |
Adding transitive deps test #1
Diffstat (limited to 'inttest/tdeps1')
-rw-r--r-- | inttest/tdeps1/a.erl | 4 | ||||
-rw-r--r-- | inttest/tdeps1/a.rebar.config | 2 | ||||
-rw-r--r-- | inttest/tdeps1/b.hrl | 3 | ||||
-rw-r--r-- | inttest/tdeps1/b.rebar.config | 2 | ||||
-rw-r--r-- | inttest/tdeps1/c.hrl | 2 | ||||
-rw-r--r-- | inttest/tdeps1/tdeps1_rt.erl | 48 |
6 files changed, 61 insertions, 0 deletions
diff --git a/inttest/tdeps1/a.erl b/inttest/tdeps1/a.erl new file mode 100644 index 0000000..5236b89 --- /dev/null +++ b/inttest/tdeps1/a.erl @@ -0,0 +1,4 @@ +-module(a). + +-include_lib("b/include/b.hrl"). + diff --git a/inttest/tdeps1/a.rebar.config b/inttest/tdeps1/a.rebar.config new file mode 100644 index 0000000..afeef7a --- /dev/null +++ b/inttest/tdeps1/a.rebar.config @@ -0,0 +1,2 @@ +{deps, [{b, "1", {hg, "../repo/b", "tip"}}]}. + diff --git a/inttest/tdeps1/b.hrl b/inttest/tdeps1/b.hrl new file mode 100644 index 0000000..897f348 --- /dev/null +++ b/inttest/tdeps1/b.hrl @@ -0,0 +1,3 @@ + +-include_lib("c/include/c.hrl"). + diff --git a/inttest/tdeps1/b.rebar.config b/inttest/tdeps1/b.rebar.config new file mode 100644 index 0000000..ced29cc --- /dev/null +++ b/inttest/tdeps1/b.rebar.config @@ -0,0 +1,2 @@ +{deps, [{c, "1", {hg, "../repo/c", "tip"}}]}. + diff --git a/inttest/tdeps1/c.hrl b/inttest/tdeps1/c.hrl new file mode 100644 index 0000000..84cf2d4 --- /dev/null +++ b/inttest/tdeps1/c.hrl @@ -0,0 +1,2 @@ +-define(HELLO, hello). + diff --git a/inttest/tdeps1/tdeps1_rt.erl b/inttest/tdeps1/tdeps1_rt.erl new file mode 100644 index 0000000..8005741 --- /dev/null +++ b/inttest/tdeps1/tdeps1_rt.erl @@ -0,0 +1,48 @@ +-module(tdeps1_rt). + +-compile(export_all). + +%% Exercise transitive dependencies +%% A -> B -> C, where A includes a .hrl from B which includes .hrl from C + +files() -> + [ + %% A application + {create, "ebin/a.app", app(a)}, + {copy, "a.rebar.config", "rebar.config"}, + {copy, "a.erl", "src/a.erl"}, + {copy, "../../rebar", "rebar"}, + + %% B application + {create, "repo/b/ebin/b.app", app(b)}, + {copy, "b.rebar.config", "repo/b/rebar.config"}, + {copy, "b.hrl", "repo/b/include/b.hrl"}, + + %% C application + {create, "repo/c/ebin/c.app", app(c)}, + {copy, "c.hrl", "repo/c/include/c.hrl"} + ]. + +run(_Dir) -> + %% Initialize the b/c apps as mercurial repos so that dependencies pull + %% properly + HgCmd = "hg init && hg add && hg commit -m 'Initial commit'", + retest_log:log(debug, "~s\n", [os:cmd("(cd repo/b && " ++ HgCmd ++ ")")]), + retest_log:log(debug, "~s\n", [os:cmd("(cd repo/c && " ++ HgCmd ++ ")")]), + + retest_log:log(debug, "~s\n", [os:cmd("./rebar get-deps compile")]), + ok. + + + +%% +%% Generate the contents of a simple .app file +%% +app(Name) -> + App = {application, Name, + [{description, atom_to_list(Name)}, + {vsn, "1"}, + {modules, []}, + {registered, []}, + {applications, [kernel, stdlib]}]}, + io_lib:format("~p.\n", [App]). |