Sync with 5.4.0
[deliverable/titan.core.git] / regression_test / ASN1 / Test358 / Test358T.ttcn
CommitLineData
970ed795 1/******************************************************************************
3abe9331 2 * Copyright (c) 2000-2015 Ericsson Telecom AB
970ed795
EL
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
7 ******************************************************************************/
8module Test358T
9{
10
11import from Test358A all;
12
13const MyEnumeratedType myEnumeratedValue1B := first
14
15const MyEnumeratedType myEnumeratedValue2B := second
16
17const MyEnumeratedType myEnumeratedValue3B := third
18
19type component MyMainComponent
20 {}
21
22testcase Test() runs on MyMainComponent
23{
24
25if ((myEnumeratedValue1A == myEnumeratedValue1B)
26and (myEnumeratedValue2A == myEnumeratedValue2B)
27and (myEnumeratedValue3A == myEnumeratedValue3B))
28
29 {setverdict ( pass );}
30 else { setverdict ( fail );}
31
32}
33
34control
35 {
36 execute (Test())
37 }
38
39}
This page took 0.037537 seconds and 5 git commands to generate.