[r236]: / tags / v1.0.0.0 / SimpleCfUnitExample.project.md  Maximize  Restore  History

Download this file

80 lines (66 with data), 1.2 kB


FUNCTION_BLOCK FB_Sum_Test EXTENDS CfUnit.FB_TestSuite
TwoPlusTwoEqualsFour();
ZeroPlusZeroEqualsZero();

METHOD TwoPlusTwoEqualsFour: 
VAR
    Sum: FB_Sum;
    Result: UINT;
    ExpectedSum: UINT;
END_VAR
TEST('TwoPlusTwoEqualsFour');

Sum(one := 2, two := 2, result => Result);

AssertEquals(Expected := ExpectedSum,
             Actual := Result,
             Message := 'The calculation is not correct');

TEST_FINISHED();

METHOD ZeroPlusZeroEqualsZero: 
VAR
    Sum: FB_Sum;
    Result: UINT;
    ExpectedSum: UINT;
END_VAR
TEST('ZeroPlusZeroEqualsZero');

Sum(one := 0, two := 0, result => Result);

AssertEquals(Expected := ExpectedSum,
             Actual := Result,
             Message := 'The calculation is not correct');

TEST_FINISHED();

PROGRAM PRG_TEST
VAR
    fbSum_Test: FB_Sum_Test;
END_VAR
CfUnit.RUN();

FUNCTION_BLOCK FB_Sum
VAR_INPUT
    one: UINT;
    two: UINT;
END_VAR
VAR_OUTPUT
    result: UINT;
END_VAR
result := one + two;