Changeset 87

Timestamp:

08/06/09 10:53:43 (3 years ago)

Author:

dom

Message:

text_printer now handles file deletions correctly.

Location:

trunk

Files:

• doc/TODO (modified) (2 diffs)
• src/text_printer.erl (modified) (1 diff)
• src/text_printer_test.erl (modified) (2 diffs)

trunk/doc/TODO

@@ -4 +4 @@
 ------------
 
-- text_printer doesn't yet handle file removals.
 - fixtures:make_tree doesn't like {file, "a", "a"} in tree.
 
@@ -15 +14 @@
 - add a "run once" mode for directory_tester
 - print file(line) for test errors too
+- remove or print to text =ERROR REPORT==== from tests which
+  voluntarily crash processes
 - detect -include dependencies and recompile all when .hrl changes
 - run tests in parallel

trunk/src/text_printer.erl

@@ -11 +11 @@
 wait (Device) ->
     receive
-        {_, compiler, {Total, Done, _}} ->
+        {_, compiler, {Total, Done, _}} when Total > Done ->
             io: put_chars (Device, io_lib: fwrite ("Compiling ~p: ", [Total - Done])),
             compiling (Device);
-        {_, tester, {Total, Done, _}} ->
+        {_, tester, {Total, Done, _}} when Total > Done ->
             io: put_chars (Device, io_lib: fwrite ("Testing ~p: ", [Total - Done])),
             testing (Device);

trunk/src/text_printer_test.erl

@@ -7 +7 @@
 -export ([compile_output/0]).
 -export ([test_output/0]).
+-export ([file_deletion/0]).
 
 compile_output () ->
@@ -46 +47 @@
     ok.
 
+file_deletion () ->
+    P = spawn_link (text_printer, init, [self ()]),
+    P ! {self (), compiler, {2, 2, 2}},
+    timeout = receive_io_request (P),
+    P ! {self (), tester, {1, 0, 0}},
+    <<"Testing 1: ">> = receive_io_request (P),
+    P ! {self (), tester, {1, 1, 1}},
+    <<".\n1/1 successfully tested.\n">> = receive_io_request (P),
+    ok.
+
 warning () ->
     {"/dir/file.erl", [{12, erl_lint, {unused_function,{foo,1}}}]}.