Download this file
1 2 3 4 5 6 7 8 9 10 11
(* Message : T_MaxString; // The identifying message for the assertion error END_VAR VAR TestInstancePath : T_MaxString; TestInstancePath := AddTestNameToInstancePath(TestInstancePath := FindTestSuiteInstancePath()); AssertResults.ReportResult(ExpectedSize := SIZEOF(Expected), ActualTypeClass := IBaseLibrary.TypeClass.TYPE_WSTRING, ActualValue := ADR(Actual), Message := Message, IF NOT AlreadyReported AND (WLEN(STR := Expected) <> WLEN(STR := Actual) OR (Expected <> Actual)) THEN