Lev Walkin | f15320b | 2004-06-03 03:38:44 +0000 | [diff] [blame] | 1 | |
| 2 | -- OK: Everything is fine |
| 3 | |
| 4 | -- iso.org.dod.internet.private.enterprise (1.3.6.1.4.1) |
| 5 | -- .spelio.software.asn1c.test (9363.1.5.1) |
| 6 | -- .18 |
| 7 | |
| 8 | ModuleTestClass |
| 9 | { iso org(3) dod(6) internet(1) private(4) enterprise(1) |
| 10 | spelio(9363) software(1) asn1c(5) test(1) 18 } |
| 11 | DEFINITIONS ::= |
| 12 | BEGIN |
| 13 | |
| 14 | AlphaNumeric ::= IA5String (FROM ("A".."Z"|"a".."z"|"0".."9")) |
| 15 | |
| 16 | FUNCTION ::= CLASS { |
| 17 | &code INTEGER (0..MAX) UNIQUE, |
| 18 | &Alphabet IA5String DEFAULT {AlphaNumeric}, |
| 19 | &ArgType , |
| 20 | &SupportedArguments &ArgType OPTIONAL, |
| 21 | &ResultType DEFAULT NULL, |
| 22 | &result-if-error &ResultType DEFAULT NULL, |
| 23 | &associated-function FUNCTION OPTIONAL |
| 24 | } |
| 25 | |
| 26 | operator-plus FUNCTION ::= { |
| 27 | &ArgType Pair, |
| 28 | &SupportedArguments { PosPair | NegPair } |
| 29 | &ResultType INTEGER, |
| 30 | &result-if-error 0, |
| 31 | &code 1 |
| 32 | } |
| 33 | |
| 34 | FunctionCodeType ::= FUNCTION.&code |
| 35 | |
| 36 | END |