t/etap_t_013.erl
t/etap_t_013.t
@@ -1,6 +1,6 @@
LIBDIR=`erl -eval 'io:format("~s~n", [code:lib_dir()])' -s init stop -noshell`
.PHONY: doc
-VERSION=0.3.3
+VERSION=0.3.4
all:
mkdir -p ebin
Makefile
@@ -48,9 +48,9 @@ The included tests cover the basic functionality of the etap modules. They can a
To install etap you need to create the `etap/ebin/` directory in your current Erlang library and copy all of the .beam files created by the `make` file.
- $ sudo mkdir -p /usr/lib/erlang/lib/etap-0.3.3/ebin
+ $ sudo mkdir -p /usr/lib/erlang/lib/etap-0.3.4/ebin
$ make clean && make
- $ sudo cp ebin/*.beam /usr/lib/erlang/lib/etap-0.3.3/ebin/
+ $ sudo cp ebin/*.beam /usr/lib/erlang/lib/etap-0.3.4/ebin/
The `make dist-src` target can be used to create source distributions for further packaging and deployment.
@@ -91,8 +91,8 @@ There are a number of proposals listed on the TAP wiki that are not supported by
* LIMITED SUPPORTED: TAP diagnostic syntax
* LIMITED SUPPORTED: TAP meta information
* LIMITED SUPPORTED: TAP logging syntax
- * SUPPORTED: SKIP
* NOT SUPPORTED: TODO
+ * SUPPORTED: SKIP
* SUPPORTED: TAP datetime
* SUPPORTED: c0 code coverage
* SUPPORTED: html code coverage reports
README.markdown
@@ -23,7 +23,7 @@
%%
%% @author Nick Gerakines <nick@gerakines.net> [http://socklabs.com/]
%% @author Jeremy Wall <jeremy@marzhillstudios.com>
-%% @version 0.3.3
+%% @version 0.3.4
%% @copyright 2007-2008 Jeremy Wall, 2008-2009 Nick Gerakines
%% @reference http://testanything.org/wiki/index.php/Main_Page
%% @reference http://en.wikipedia.org/wiki/Test_Anything_Protocol
@@ -52,12 +52,17 @@
datetime/1, skip/3
]).
-record(test_state, {planned = 0, count = 0, pass = 0, fail = 0, skip = 0, skip_reason = ""}).
--vsn("0.3.3").
+-vsn("0.3.4").
%% @spec plan(N) -> Result
-%% N = skip | {skip, string()} | integer()
+%% N = unknown | skip | {skip, string()} | integer()
%% Result = ok
%% @doc Create a test plan and boot strap the test server.
+plan(unknown) ->
+ ensure_coverage_starts(),
+ ensure_test_server(),
+ etap_server ! {self(), plan, unknown},
+ ok;
plan(skip) ->
io:format("1..0 # skip~n");
plan({skip, Reason}) ->
@@ -70,8 +75,17 @@ plan(N) when is_integer(N), N > 0 ->
%% @spec end_tests() -> ok
%% @doc End the current test plan and output test results.
+%% @todo This should probably be done in the test_server process.
end_tests() ->
ensure_coverage_ends(),
+ etap_server ! {self(), state},
+ State = receive X -> X end,
+ if
+ State#test_state.planned == -1 ->
+ io:format("1..~p~n", [State#test_state.count]);
+ true ->
+ ok
+ end,
case whereis(etap_server) of
undefined -> ok;
_ -> etap_server ! done, ok
@@ -278,6 +292,17 @@ start_etap_server() ->
%% message that clears the current test state.
test_server(State) ->
NewState = receive
+ {_From, plan, unknown} ->
+ io:format("# Current time local ~s~n", [datetime(erlang:localtime())]),
+ io:format("# Using etap version ~p~n", [ proplists:get_value(vsn, proplists:get_value(attributes, etap:module_info())) ]),
+ State#test_state{
+ planned = -1,
+ count = 0,
+ pass = 0,
+ fail = 0,
+ skip = 0,
+ skip_reason = ""
+ };
{_From, plan, N} ->
io:format("# Current time local ~s~n", [datetime(erlang:localtime())]),
io:format("# Using etap version ~p~n", [ proplists:get_value(vsn, proplists:get_value(attributes, etap:module_info())) ]),
src/etap.erl
@@ -291,7 +291,7 @@ header(Module, Good, Bad) ->
</head>
<body>
<h3>C0 code coverage information</h3>
- <p>Generated on ~s with <a href='http://github.com/ngerakines/etap'>etap 0.3.3</a>.
+ <p>Generated on ~s with <a href='http://github.com/ngerakines/etap'>etap 0.3.4</a>.
</p>
<table class='report'>
<thead>
@@ -335,7 +335,7 @@ header(Module, Good, Bad) ->
%% @private
footer() ->
- "</pre><hr /><p>Generated using <a href='http://github.com/ngerakines/etap'>etap 0.3.3</a>.</p>
+ "</pre><hr /><p>Generated using <a href='http://github.com/ngerakines/etap'>etap 0.3.4</a>.</p>
</body>
</html>
".
src/etap_report.erl
@@ -2,7 +2,7 @@
@title A TAP testing client.
@author Nick Gerakines <nick@gerakines.net>
@author Jeremy Wall <jeremy@marzhillstudios.com>
-@version 0.3.3
+@version 0.3.4
@doc A TAP testing client.
<p>etap is a collection of Erlang modules that provide a TAP testing client library. These modules allow developers to create extensive and comprehensive tests covering many aspects of application and module development. This includes simple assertions, exceptions, the application behavior and event web requests. This library was originally written by Jeremy wall.</p>
@@ -46,9 +46,9 @@ $ make prove
<p>To install etap you need to create the <code>etap/ebin/</code> directory in your current Erlang library and copy all of the .beam files created by the <code>make</code> file.</p>
-<pre><code>$ sudo mkdir -p /usr/lib/erlang/lib/etap-0.3.3/ebin
+<pre><code>$ sudo mkdir -p /usr/lib/erlang/lib/etap-0.3.4/ebin
$ make clean && make
-$ sudo cp ebin/*.beam /usr/lib/erlang/lib/etap-0.3.3/ebin/
+$ sudo cp ebin/*.beam /usr/lib/erlang/lib/etap-0.3.4/ebin/
</code></pre>
<p>The <code>make dist-src</code> target can be used to create source distributions for further packaging and deployment.</p>
src/overview.edoc
36ae9bb84446842b0aee70d9b28ee9c028dc9a2a
Nick Gerakines
nick@gerakines.net
http://github.com/ngerakines/etap/commit/f5d36d0c34696b2def2f658cb9cc8733a27ba2e5
f5d36d0c34696b2def2f658cb9cc8733a27ba2e5
2009-04-24T18:33:42-07:00
2009-04-24T18:33:42-07:00
Adding support for unknown test plans. Bumped version to 0.3.4
db73db06833e19a2759b2bc44014f72ba1370da5
Nick Gerakines
nick@gerakines.net