From 69ae8b8039c341f1f86ebab9ec8ebbfc1be80134 Mon Sep 17 00:00:00 2001 From: Nathan Lasseter Date: Fri, 28 Jan 2011 22:15:26 +0000 Subject: Added tests --- TODO.textile | 1 + erlbal_tests.erl | 10 ++++++++++ 2 files changed, 11 insertions(+) create mode 100644 erlbal_tests.erl diff --git a/TODO.textile b/TODO.textile index 9707d08..bf95e49 100644 --- a/TODO.textile +++ b/TODO.textile @@ -3,6 +3,7 @@ h1. TODO h2. Little changes: * Add server state +* stop_bal/1 should not kill servers h2. BIG changes: diff --git a/erlbal_tests.erl b/erlbal_tests.erl new file mode 100644 index 0000000..df68706 --- /dev/null +++ b/erlbal_tests.erl @@ -0,0 +1,10 @@ +-module(erlbal_tests). +-export([start/1]). + +start(simple) -> + Bal = erlbal:start_bal(), + erlbal:start_server(Bal, node(), fun(_) -> 7 end), + erlbal:start_server(Bal, node(), fun(_) -> 8 end), + 7 = erlbal:make_request(Bal, []), + 8 = erlbal:make_request(Bal, []), + erlbal:stop_bal(Bal). -- cgit v1.2.1