regression_test/ASN1/Test38/Test38B.asn

   1 --/////////////////////////////////////////////////////////////////////////////
   2 -- Copyright (c) 2000-2015 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
   7 --/////////////////////////////////////////////////////////////////////////////
   8 Test38B  --B
   9 DEFINITIONS
  10
  11 IMPLICIT TAGS
  12
  13
  14 ::=
  15
  16 BEGIN
  17
  18 IMPORTS ; -- nothing
  19
  20 zero INTEGER ::= 0
  21 one INTEGER ::= 1
  22 two INTEGER ::= 2
  23 three INTEGER ::= 3
  24 four INTEGER ::= 4
  25 five INTEGER ::= 5
  26 six INTEGER ::= 6
  27 seven INTEGER ::= 7
  28
  29
  30 MySequenceType1 ::= SEQUENCE {
  31                              field1 [zero] INTEGER,
  32                              field2 [one] BOOLEAN,
  33                              field3 [two] NULL,
  34                              field4 [three] OCTET STRING OPTIONAL,
  35                              field5 [four] BIT STRING OPTIONAL,
  36                              field6 [five] ENUMERATED {a,b,c},
  37                              field7 [six] REAL
  38                             }
  39
  40 MySetType1 ::= SET {
  41                              field1 [zero] INTEGER,
  42                              field2 [one] BOOLEAN,
  43                              field3 [two] NULL,
  44                              field4 [three] OCTET STRING OPTIONAL,
  45                              field5 [four] BIT STRING OPTIONAL,
  46                              field6 [five] ENUMERATED {a,b,c},
  47                              field7 [six] REAL,
  48                              field8 [seven]MySequenceType1
  49                             }
  50 MyChoiceType1 ::= CHOICE
  51                             {
  52                              field1 [zero] INTEGER,
  53                              field2 [one] BOOLEAN,
  54                              field3 [two] NULL,
  55                              field4 [three] OCTET STRING,
  56                              field5 [four] BIT STRING,
  57                              field6 [five] ENUMERATED {a,b,c},
  58                              field7 [six] REAL,
  59                              field8 [seven] MySequenceType1
  60                             }
  61 END