Rev | Line | |
---|
[7] | 1 | module localDependencies { |
---|
| 2 | |
---|
| 3 | type enumerated enumtype { |
---|
| 4 | enum1, enum2 |
---|
| 5 | } |
---|
| 6 | type enumerated enumtype2 { |
---|
| 7 | enum2, enum1 |
---|
| 8 | } |
---|
| 9 | |
---|
| 10 | modulepar { |
---|
| 11 | typeX pp1, pp2 := int2string(2), pp4:=someConst; |
---|
| 12 | typeY pp31 := someConst, pp5; |
---|
| 13 | |
---|
| 14 | } |
---|
| 15 | |
---|
| 16 | modulepar typeZ pp6, pp7; |
---|
| 17 | |
---|
| 18 | //* @desc 1 |
---|
| 19 | template typeX templateY :={ |
---|
| 20 | fieldZ := 1 |
---|
| 21 | } |
---|
| 22 | |
---|
| 23 | //* @desc 1 |
---|
| 24 | function f1(typeX par1 := templateY){ |
---|
| 25 | var enumtype ve1; |
---|
| 26 | ve1:=enum1; |
---|
| 27 | if (ve1 == enum1){ |
---|
| 28 | } |
---|
| 29 | if (enum1 > enum2){ |
---|
| 30 | // |
---|
| 31 | } |
---|
| 32 | f2(); |
---|
| 33 | f2(); |
---|
| 34 | f3(); |
---|
| 35 | } |
---|
| 36 | |
---|
| 37 | function fr1(enumtype p1) return enumtype2{ |
---|
| 38 | return enum1; |
---|
| 39 | } |
---|
| 40 | |
---|
| 41 | function f2(){ |
---|
| 42 | //f1(); |
---|
| 43 | f3(); |
---|
| 44 | fx(cx); |
---|
| 45 | fr1(enum1) |
---|
| 46 | if (enum2 == fr1(1)){ |
---|
| 47 | |
---|
| 48 | } |
---|
| 49 | |
---|
| 50 | } |
---|
| 51 | external function fx(typeX p1); |
---|
| 52 | external const integer cx; |
---|
| 53 | } |
---|
Note: See
TracBrowser
for help on using the repository browser.