The article is very good, but it does not focuse on all aspects.
I have tried to create my first test example, but it didn't work. The
compilation is successful and the program is executed without errors.
However, I received no messages, informing the test has failed.
Actually, the test should be failed.
This example is seemingly equivalent the minimum example supplied by
the article.
As recommended, I only add the unit "test" in the clause "uses", so the
test was expected to run. Does someone know what is wrong?
First of all, a unit with a routine to be tested:
unit numbers;
{$mode objfpc}{$h+}
interface
uses
Sysutils;
function calculate(a, b: integer):integer;
implementation
function calculate(a, b: integer):integer;
begin
result := a + b;
end;
INITIALIZATION
END.
Now, my testcase class:
unit test;
{$mode objfpc}{$h+}
interface
numbers, fpcunit, testregistry;
uses
type
TBugTest = class(TTestCase)
published
procedure calculate;
end;
implementation
procedure TBugTest.calculate;
begin
AssertEquals('The calculation is not done', 8, numbers.calculate(5, 4));
end;
INITIALIZATION
RegisterTest(TBugTest);
END.
Now, the runer:
program apptest;
{$mode objfpc}{$h+}
uses
test;
begin
end.
Em 16/12/2011 11:44, Michael Van Canneyt escreveu:
On Fri, 16 Dec 2011, Vincent Snijders wrote:
2011/12/16 luciano de souza <luchya...@gmail.com>:
Hello listers,
Navigating in FPC source codes, I found fpcunit. It's really
wonderful. With the tTestCase class, we can generate a report with
the success or the failure of our tests.
Is there documentation on the usage of fpcunit? What is the best way
to study it?
Google found this (old) article:
http://www.freepascal.org/olddocs-html/fpcunit.pdf
It is old, but still correct.
I will see about refreshing it, and adding it in the FPC documentation.
Michael.
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
--
Luciano de Souza
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
