[r391]: / trunk / Library / POUs / Functions / TEST_FINISHED / svnobj  Maximize  Restore  History

Download this file

4 lines (4 with data), 3.5 kB

Gx_l’
!0…jüo	w,J—a1…Ó¢System.StringL{6f9dac99-8de1-4efc-8465-68ac443b7d08}SpecialFuncL{0db3d7bb-cde0-4416-9a7b-ce49a0124323}NoneImplementationL{3b83b776-fb25-43b8-99f2-3c507c9143fc}TextDocument	L{f3878285-8e4f-490b-bb1b-9acbb7eb04db}
TextLinesL{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}Id
longTagTextN// Grab the currently running test namedTestName := GVL_CfUnit.CurrentTestNameBeingCalled;.TEST_FINISHED := FALSE;6(* Find the test suite and:b   1. Set the test in that test suite as finished€   2. Calculate and set the number of asserts made for that test*)ˆFOR Counter := 1 TO GVL_CfUnit.NumberOfInitializedTestSuites BY 1 DO¶    IF GVL_CfUnit.TestSuiteAddresses[Counter] = GVL_CfUnit.CurrentTestSuiteBeingCalled THENê        GVL_CfUnit.TestSuiteAddresses[Counter]^.SetTestFinished( TestName := GVL_CfUnit.CurrentTestNameBeingCalled );’        GVL_CfUnit.TestSuiteAddresses[Counter]^.CalculateAndSetNumberOfAssertsForTest(TestName := GVL_CfUnit.CurrentTestNameBeingCalled);b        GVL_CfUnit.CurrentTestIsFinished := TRUE;0		TEST_FINISHED := TRUE;		RETURN;    END_IF END_FOR!Interface"L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}#b(* Sets the currently running test as finished *)$:FUNCTION TEST_FINISHED : BOOL%VAR&6    TestName : T_MaxString;'0    Counter : UINT := 0;(END_VAR)"UniqueIdGenerator*40+POULevel,L{8e575c5b-1d37-49c6-941b-5c0ec7874787}-Standard. ChildObjectGuids/8System.Collections.ArrayList0,AddAttributeSubsequent1boolÐÐ-ÐÐ	E
ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­&ÚÐ-ÐÐ
­'ÚÐ-ÐÐ
­(ÚÐ-ÐÐ
­	ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­%ÚÐ-ÐÐ
­#ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ- Ð!"Ð	E
ÐÐ
­"ÚÐ-#ÐÐ
­ÚÐ-$ÐÐ
­ÚÐ-%ÐÐ
­ÚÐ-&ÐÐ
­ÚÐ-'ÐÐ
­ÚÐ-(Ð)-*Ð+,--./Ð01­