1 /******************************************************************************
2 * Copyright (c) 2000-2016 Ericsson Telecom AB
3 * All rights reserved. This program and the accompanying materials
4 * are made available under the terms of the Eclipse Public License v1.0
5 * which accompanies this distribution, and is available at
6 * http://www.eclipse.org/legal/epl-v10.html
9 * Adrien Kirjak – initial implementation
12 ** @purpose 1:24.1, Ensure that setverdict can't set error verdict
13 ** @verdict pass reject, manual:"Ensure only one test case was executed "
14 *****************************************************************/
16 * #reqname /Requirements/24 Test verdict operations/24.1 The Verdict mechanism/Error verdict shall not be set with setverdict
19 module NegSem_2401_SetverdictError_001 {
20 type component GeneralComp {};
22 testcase TC_NegSem_2401_SetverdictError_001_setverdict(out boolean pb_error_occurred) runs on GeneralComp {
23 pb_error_occurred := true;
26 pb_error_occurred := false;
30 testcase TC_NegSem_2401_SetverdictError_001_check_error_occured(boolean b_error_occurred) runs on GeneralComp {
31 if (b_error_occurred) {
39 var boolean b_error_occurred := true;
40 execute(TC_NegSem_2401_SetverdictError_001_setverdict(b_error_occurred));
41 execute(TC_NegSem_2401_SetverdictError_001_check_error_occured(b_error_occurred));