| Line 63... |
Line 63... |
--- Constants ---
|
--- Constants ---
|
-- The user is free to modify the values to fit his/her requirements.
|
-- The user is free to modify the values to fit his/her requirements.
|
constant C_PLTBUTILS_USE_STD_STARTSIM_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_STARTSIM_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_ENDSIM_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_ENDSIM_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_STARTTEST_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_STARTTEST_MSG : boolean := true;
|
|
constant C_PLTBUTILS_USE_STD_SKIPTEST_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_ENDTEST_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_ENDTEST_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_CHECK_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_CHECK_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_ERROR_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_ERROR_MSG : boolean := true;
|
constant C_PLTBUTILS_USE_STD_STOPSIM : boolean := true;
|
constant C_PLTBUTILS_USE_STD_STOPSIM : boolean := true;
|
constant C_PLTBUTILS_USE_CUSTOM_STARTSIM_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_STARTSIM_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_ENDSIM_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_ENDSIM_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_STARTTEST_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_STARTTEST_MSG : boolean := false;
|
|
constant C_PLTBUTILS_USE_CUSTOM_SKIPTEST_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_ENDTEST_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_ENDTEST_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_CHECK_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_CHECK_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_ERROR_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_ERROR_MSG : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_STOPSIM : boolean := false;
|
constant C_PLTBUTILS_USE_CUSTOM_STOPSIM : boolean := false;
|
|
|
| Line 91... |
Line 93... |
|
|
procedure custom_endsim_msg(
|
procedure custom_endsim_msg(
|
constant testcase_name : in string;
|
constant testcase_name : in string;
|
constant timestamp : in time;
|
constant timestamp : in time;
|
constant num_tests : in integer;
|
constant num_tests : in integer;
|
|
constant num_skip_tests : in integer;
|
constant num_checks : in integer;
|
constant num_checks : in integer;
|
constant num_errors : in integer;
|
constant num_errors : in integer;
|
constant show_success_fail : in boolean
|
constant show_success_fail : in boolean
|
);
|
);
|
|
|
| Line 102... |
Line 105... |
constant test_num : in integer;
|
constant test_num : in integer;
|
constant test_name : in string;
|
constant test_name : in string;
|
constant timestamp : in time
|
constant timestamp : in time
|
);
|
);
|
|
|
|
procedure custom_skiptest_msg(
|
|
constant test_num : in integer;
|
|
constant test_name : in string;
|
|
constant timestamp : in time
|
|
);
|
|
|
procedure custom_endtest_msg(
|
procedure custom_endtest_msg(
|
constant test_num : in integer;
|
constant test_num : in integer;
|
constant test_name : in string;
|
constant test_name : in string;
|
constant timestamp : in time;
|
constant timestamp : in time;
|
|
constant test_active : in boolean;
|
constant num_checks_in_test : in integer;
|
constant num_checks_in_test : in integer;
|
constant num_errors_in_test : in integer
|
constant num_errors_in_test : in integer
|
);
|
);
|
|
|
procedure custom_check_msg(
|
procedure custom_check_msg(
|
| Line 187... |
Line 197... |
|
|
procedure custom_endsim_msg(
|
procedure custom_endsim_msg(
|
constant testcase_name : in string;
|
constant testcase_name : in string;
|
constant timestamp : in time;
|
constant timestamp : in time;
|
constant num_tests : in integer;
|
constant num_tests : in integer;
|
|
constant num_skip_tests : in integer;
|
constant num_checks : in integer;
|
constant num_checks : in integer;
|
constant num_errors : in integer;
|
constant num_errors : in integer;
|
constant show_success_fail : in boolean
|
constant show_success_fail : in boolean
|
) is
|
) is
|
begin
|
begin
|
| Line 206... |
Line 217... |
begin
|
begin
|
-- TeamCity ignores test_num and timestamp
|
-- TeamCity ignores test_num and timestamp
|
print("##teamcity[testStarted name='" & tcfilter(test_name) & "']");
|
print("##teamcity[testStarted name='" & tcfilter(test_name) & "']");
|
end procedure custom_starttest_msg;
|
end procedure custom_starttest_msg;
|
|
|
|
procedure custom_skiptest_msg(
|
|
constant test_num : in integer;
|
|
constant test_name : in string;
|
|
constant timestamp : in time
|
|
) is
|
|
begin
|
|
-- TeamCity ignores test_num and timestamp
|
|
print("##teamcity[testIgnored name='" & tcfilter(test_name) & "']");
|
|
end procedure custom_skiptest_msg;
|
|
|
procedure custom_endtest_msg(
|
procedure custom_endtest_msg(
|
constant test_num : in integer;
|
constant test_num : in integer;
|
constant test_name : in string;
|
constant test_name : in string;
|
constant timestamp : in time;
|
constant timestamp : in time;
|
|
constant test_active : in boolean;
|
constant num_checks_in_test : in integer;
|
constant num_checks_in_test : in integer;
|
constant num_errors_in_test : in integer
|
constant num_errors_in_test : in integer
|
) is
|
) is
|
begin
|
begin
|
|
if test_active then
|
-- TeamCity ignores all arguments except test_name
|
-- TeamCity ignores all arguments except test_name
|
print("##teamcity[testFinished name='" & tcfilter(test_name) & "']");
|
print("##teamcity[testFinished name='" & tcfilter(test_name) & "']");
|
|
end if;
|
end procedure custom_endtest_msg;
|
end procedure custom_endtest_msg;
|
|
|
procedure custom_check_msg(
|
procedure custom_check_msg(
|
constant rpt : in string;
|
constant rpt : in string;
|
constant timestamp : in time;
|
constant timestamp : in time;
|
