Changeset 87 for trunk/src/text_printer.erl
- Timestamp:
- 08/06/09 10:53:43 (3 years ago)
- File:
-
- 1 edited
-
trunk/src/text_printer.erl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/text_printer.erl
r77 r87 11 11 wait (Device) -> 12 12 receive 13 {_, compiler, {Total, Done, _}} ->13 {_, compiler, {Total, Done, _}} when Total > Done -> 14 14 io: put_chars (Device, io_lib: fwrite ("Compiling ~p: ", [Total - Done])), 15 15 compiling (Device); 16 {_, tester, {Total, Done, _}} ->16 {_, tester, {Total, Done, _}} when Total > Done -> 17 17 io: put_chars (Device, io_lib: fwrite ("Testing ~p: ", [Total - Done])), 18 18 testing (Device);
Note: See TracChangeset
for help on using the changeset viewer.
