Last change
on this file since 45 was
7,
checked in by phdmakk, 15 years ago
|
|
-
Property svn:executable set to
*
|
File size:
1.2 KB
|
Line | |
---|
1 | /**
|
---|
2 | * @author STF 340
|
---|
3 | * @version $Id: AtsDpmr_Types.ttcn 87 2008-02-22 15:53:29Z petersenj $
|
---|
4 | * @desc Data type definitions for information elements for digital Public
|
---|
5 | * Mobile Radio (dPMR) messages
|
---|
6 | */
|
---|
7 | module functionalityTest {
|
---|
8 |
|
---|
9 | import from Examplemodule {group ExampleGroup};
|
---|
10 | import from Examplemodule {function ExampleFunction, ExampleFunction; const con2};
|
---|
11 | import from Examplemodule {const con1};
|
---|
12 | import from Examplemodule all except {const con1, con2; function all};
|
---|
13 | import from Examplemodule recursive all;
|
---|
14 |
|
---|
15 |
|
---|
16 | group types{
|
---|
17 |
|
---|
18 | group Structured{
|
---|
19 | type component Comp{};
|
---|
20 |
|
---|
21 | type record Rec{};
|
---|
22 |
|
---|
23 | type integer Int;
|
---|
24 |
|
---|
25 | type set of Rec SetOfRec;
|
---|
26 |
|
---|
27 | type port Port message{
|
---|
28 | in Rec;
|
---|
29 | out Rec;
|
---|
30 | };
|
---|
31 |
|
---|
32 | type enumerated Enum{ Rec, Int};
|
---|
33 |
|
---|
34 | type set Set{};
|
---|
35 |
|
---|
36 | type record of Rec RecordOfRec;
|
---|
37 |
|
---|
38 | type union Union{RecordOfRec un1, SetOfRec un2};
|
---|
39 |
|
---|
40 | }
|
---|
41 | group subtype{
|
---|
42 | type Rec RecType;
|
---|
43 |
|
---|
44 | type integer IntType;
|
---|
45 |
|
---|
46 | }
|
---|
47 |
|
---|
48 | }
|
---|
49 |
|
---|
50 | group functions{
|
---|
51 |
|
---|
52 | function f_1(Comp par1, Rec par2, boolean par3) runs on Rec{
|
---|
53 | var Port var1;
|
---|
54 | if(par3){
|
---|
55 |
|
---|
56 | } else{
|
---|
57 |
|
---|
58 | }
|
---|
59 | }
|
---|
60 |
|
---|
61 |
|
---|
62 | }
|
---|
63 |
|
---|
64 |
|
---|
65 |
|
---|
66 | group constants{
|
---|
67 |
|
---|
68 | const integer c1 := 1, c2 := 2;
|
---|
69 |
|
---|
70 |
|
---|
71 | }
|
---|
72 |
|
---|
73 |
|
---|
74 |
|
---|
75 |
|
---|
76 | } |
---|
Note: See
TracBrowser
for help on using the repository browser.