Adding rt for bug 5

2 files changed, 29 insertions, 0 deletions

diff --git a/inttest/bug_5_rt.erl b/inttest/bug_5_rt.erl
new file mode 100644
index 0000000..9f9711d
--- /dev/null
+++ b/inttest/bug_5_rt.erl
@@ -0,0 +1,28 @@
+-module(bug_5_rt).
+
+-compile(export_all).
+
+
+files() ->
+    [{create, "ebin/a1.app", app(a1)},
+     {create, "deps/d1/src/d1.app.src", app(d1)},
+     {create, "rebar.config",
+      <<"{deps, [{d1, \"1\", {hg, \"http://example.com\", \"tip\"}}]}.\n">>},
+     {copy, "../rebar", "rebar"}].
+
+run(_Dir) ->
+    {ok, _} = retest:sh("./rebar compile").
+
+
+
+%%
+%% 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]).
diff --git a/inttest/retest b/inttest/retest
new file mode 120000
index 0000000..ff9a17f
--- /dev/null
+++ b/inttest/retest
@@ -0,0 +1 @@
+/Users/dizzyd/src/public/retest/retest
\ No newline at end of file