No commit message (25d655c5) · Commits · MTS - Methods for Testing and Specification / TTCN-3_Compiler_Tests / TTCN3_PART1

15_templates/1509_match_operation/Sem_1509_MatchOperation_001.ttcn

0 → 100644

+28 −0

Original line number	Diff line number	Diff line
		/*****************************************************************
		** @author STF 409
		** @version $Rev: 150 $
		** @purpose 1:15.9, Ensure that ...
		** @verdict pass accept, noexecution
		*****************************************************************/

		module Sem_1509_MatchOperation_001 {

		type component GeneralComp { }

		template integer m_lessThan10 := (-infinity..9);

		testcase TC_Sem_1509_MatchOperation_001() runs on GeneralComp {
		var integer v_value := -20;

		if (match(v_value, m_lessThan10)) {
		setverdict(pass);
		} else {
		setverdict(fail);
		}
		}

		control{
		execute(TC_Sem_1509_MatchOperation_001());
		}

		}
		No newline at end of file

0 → 100644

+28 −0

Original line number	Diff line number	Diff line
		/*****************************************************************
		** @author STF 409
		** @version $Rev: 150 $
		** @purpose 1:15.9, Ensure that ...
		** @verdict pass accept, noexecution
		*****************************************************************/

		module Sem_1509_MatchOperation_002 {

		type component GeneralComp { }

		template integer m_lessThan10 := (-infinity..9);

		testcase TC_Sem_1509_MatchOperation_002() runs on GeneralComp {
		var integer v_value := 20;

		if (match(v_value, m_lessThan10)) {
		setverdict(fail);
		} else {
		setverdict(pass);
		}
		}

		control{
		execute(TC_Sem_1509_MatchOperation_002());
		}

		}
		No newline at end of file