[r390]: / branch / Aliazzz / Verifier / verifier / CODESYS_Control / Plc Logic / Application / Test / FB_AdjustAssertFailureMessageToMax253CharLengthTest / TestInstancePath253CharsExpectTooLongTestInstancePath / svnobj  Maximize  Restore  History

Download this file

17 lines (16 with data), 5.3 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
    AdjustAssertFailureMessageToMax253CharLength : FB_AdjustAssertFailureMessageToMax253CharLength;
    // @Text-Fixture
    TestInstancePathNameWith253CharsExpectedResult : T_MaxString := 'PRG_TEST.LongInstanceNameLongInstanceNameLongInstanceNameLongInstanceNameLongInstanceNameLongInstanceNameLongInstanceNameLongInstanceNameLongInstanceNameLongInstanceName@LONGTESTNAMELONGTESTNAMELONGTESTNAMELONGTESTNAMELONGTESTNAMELON...TestName too long';
    ShortTestMessageExpectedResult : T_MaxString := '';
    // @Test-Result
    TestInstancePathNameWith253CharsResult : T_MaxString;
    ShortTestMessageResult : T_MaxString;
TEST('TestInstancePath253CharsExpectTooLongTestInstancePath');
                                             StringArg := ShortTestMessage,
                                             StringArgProcessed => ShortTestMessageResult);
                    Actual := TestInstancePathNameWith253CharsResult,
                    'Test instance path not correct');
AssertEquals_STRING(Expected := ShortTestMessageExpectedResult,
                    Actual := ShortTestMessageResult,
                    'Test message not correct');
TEST_FINISHED();