+before encoding INTEGER 7
+before encoding OCTET STRING "The quick"
+before encoding BIT STRING: 0011000
+After Bitstring encoding:'0011000'B
+After Sequence encoding:
+{
+ 7,
+ "The quick",
+ '0011000'B
+}
+before encoding INTEGER 6
+before encoding OCTET STRING "brown"
+before encoding BIT STRING: 001100
+After Bitstring encoding:'001100'B
+After Sequence encoding:
+{
+ 6,
+ "brown",
+ '001100'B
+}
+encoding SET OF Rep-action
+before encoding INTEGER 10
+before encoding OCTET STRING "The quick"
+before encoding BIT STRING: 0011000100
+After Bitstring encoding:'0011000100'B
+After Sequence encoding:
+{
+ 10,
+ "The quick",
+ '0011000100'B
+}
+encoding SET OF Rep-action
+before encoding INTEGER 9
+before encoding OCTET STRING "brown"
+before encoding BIT STRING: 001100010
+After Bitstring encoding:'001100010'B
+After Sequence encoding:
+{
+ 9,
+ "brown",
+ '001100010'B
+}
+encoding SET OF Rep-action
+before encoding INTEGER 8
+before encoding OCTET STRING "fox jumps over"
+before encoding BIT STRING: 00110001
+After Bitstring encoding:'00110001'B
+After Sequence encoding:
+{
+ 8,
+ "fox jumps over",
+ '00110001'B
+}
+encoding SET OF Rep-action
+before encoding INTEGER 7
+before encoding OCTET STRING "The Lazy"
+before encoding BIT STRING: 0011000
+After Bitstring encoding:'0011000'B
+After Sequence encoding:
+{
+ 7,
+ "The Lazy",
+ '0011000'B
+}
+encoding SET OF Rep-action
+before encoding INTEGER 6
+before encoding OCTET STRING "dog"
+before encoding BIT STRING: 001100
+After Bitstring encoding:'001100'B
+After Sequence encoding:
+{
+ 6,
+ "dog",
+ '001100'B
+}
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 7
+r_ostring "The quick"
+r_bstring: 0011000
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 6
+r_ostring "brown"
+r_bstring: 001100
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 10
+r_ostring "The quick"
+r_bstring: 0011000100
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 9
+r_ostring "brown"
+r_bstring: 001100010
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 8
+r_ostring "fox jumps over"
+r_bstring: 00110001
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 7
+r_ostring "The Lazy"
+r_bstring: 0011000
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 6
+r_ostring "dog"
+r_bstring: 001100
+After Decoding CHOICE: chosen 1
+After Decoding UAction
+
+"Action Statements" t_test = 3
+{
+ a {
+ 6,
+ 3
+ },
+ b {
+ {
+ a 7,
+ b "The quick",
+ c '0011000'B
+ },
+ {
+ a 6,
+ b "brown",
+ c '001100'B
+ }
+ },
+ c {
+ 6,
+ 3
+ },
+ d {
+ {
+ a 10,
+ b "The quick",
+ c '0011000100'B
+ },
+ {
+ a 9,
+ b "brown",
+ c '001100010'B
+ },
+ {
+ a 8,
+ b "fox jumps over",
+ c '00110001'B
+ },
+ {
+ a 7,
+ b "The Lazy",
+ c '0011000'B
+ },
+ {
+ a 6,
+ b "dog",
+ c '001100'B
+ }
+ },
+ e {
+ -1
+ }
+}
+before encoding INTEGER 5
+before encoding OCTET STRING "The quick"
+before encoding BIT STRING: 00110
+After Bitstring encoding:'00110'B
+After Sequence encoding:
+{
+ 5,
+ "The quick",
+ '00110'B
+}
+encoding SET OF Rep-action
+before encoding INTEGER 7
+before encoding OCTET STRING "The quick"
+before encoding BIT STRING: 0011000
+After Bitstring encoding:'0011000'B
+After Sequence encoding:
+{
+ 7,
+ "The quick",
+ '0011000'B
+}
+encoding SET OF Rep-action
+before encoding INTEGER 6
+before encoding OCTET STRING "brown"
+before encoding BIT STRING: 001100
+After Bitstring encoding:'001100'B
+After Sequence encoding:
+{
+ 6,
+ "brown",
+ '001100'B
+}
+encoding SET OF Rep-action
+before encoding INTEGER 5
+before encoding OCTET STRING "fox jumps over"
+before encoding BIT STRING: 00110
+After Bitstring encoding:'00110'B
+After Sequence encoding:
+{
+ 5,
+ "fox jumps over",
+ '00110'B
+}
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 5
+r_ostring "The quick"
+r_bstring: 00110
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 7
+r_ostring "The quick"
+r_bstring: 0011000
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 6
+r_ostring "brown"
+r_bstring: 001100
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 5
+r_ostring "fox jumps over"
+r_bstring: 00110
+After Decoding CHOICE: chosen 3
+After Decoding UAction
+
+"Action Statements" t_test = 2
+{
+ a {
+ 3
+ },
+ b {
+ {
+ a 5,
+ b "The quick",
+ c '00110'B
+ }
+ },
+ c {
+ 3
+ },
+ d {
+ {
+ a 7,
+ b "The quick",
+ c '0011000'B
+ },
+ {
+ a 6,
+ b "brown",
+ c '001100'B
+ },
+ {
+ a 5,
+ b "fox jumps over",
+ c '00110'B
+ }
+ },
+ e {
+ "lets go home"
+ }
+}
+encoding SET OF Rep-action
+before encoding INTEGER 4
+before encoding OCTET STRING "The quick"
+before encoding BIT STRING: 0011
+After Bitstring encoding:'0011'B
+After Sequence encoding:
+{
+ 4,
+ "The quick",
+ '0011'B
+}
+encoding Boolean 0
+Before Decoding Rep-action
+After Decoding Rep-action:
+rp_int 4
+r_ostring "The quick"
+r_bstring: 0011
+Decoding Boolean
+After Decoding CHOICE: chosen 2
+After Decoding UAction
+
+"Action Statements" t_test = 1
+{
+ a {},
+ b {},
+ c {},
+ d {
+ {
+ a 4,
+ b "The quick",
+ c '0011'B
+ }
+ },
+ e {
+ FALSE
+ }
+}
+
+"All Simple Types" t_test = 3
+{
+ a {
+ a 'ff'H,
+ b "\b",
+ d "\n",
+ "hello there, world\n"
+ },
+ b 5,
+ c 5,
+ d 5,
+ e "hello there, world\n",
+ f "hello world\n",
+ g "hello world\n",
+ h 1.17,
+ i 1.17,
+ j 1.17,
+ k 'ff'H,
+ l '000100100011000100011010001101110'B,
+ m 9.42479,
+ n TRUE
+}
+
+"All Simple Types" t_test = 2
+{
+ a {
+ a 'ff'H,
+ c 'ff'H,
+ e 0
+ },
+ b 3,
+ c 3,
+ d 3,
+ e "hello world\n",
+ f "hello world\n",
+ g "hello world\n",
+ h 1.17.45.49,
+ i 1.17.45.49,
+ j 1.17.45.49,
+ k '00'H,
+ l '00010010001100010001101000110111'B,
+ m 6.28319,
+ n FALSE
+}
+
+"All Simple Types" t_test = 1
+{
+ a {
+ b '00'H,
+ d '00'H,
+ e -1,
+ "hello there, world\n"
+ },
+ b 1,
+ c 1,
+ d 1,
+ e "hello there, world\n",
+ f "hello world\n",
+ g "hello world\n",
+ h 1.17,
+ i 1.17,
+ j 1.17,
+ k 'ff'H,
+ l '0001001000110001000110100011011'B,
+ m 3.1416,
+ n TRUE
+}
+
+"function calling code" t_test = 3
+{
+ a 'ff'H,
+ b '00'H,
+ c "\b",
+ d "\n",
+ e 2,
+ f "hello there, world\n",
+ left {
+ a 'ff'H,
+ b '00'H,
+ d "\n",
+ e 2,
+ "hello there, world\n"
+ },
+ right {
+ a 'ff'H,
+ b "\b",
+ d "\n",
+ "hello there, world\n"
+ }
+}
+
+"function calling code" t_test = 2
+{
+ a '00'H,
+ b 'ff'H,
+ c 'ff'H,
+ d "\t",
+ f "hello world\n",
+ left {
+ a '00'H,
+ c 'ff'H
+ },
+ right {
+ a 'ff'H,
+ c 'ff'H,
+ e 0
+ }
+}
+
+"function calling code" t_test = 1
+{
+ a 'ff'H,
+ b '00'H,
+ c '00'H,
+ d "\b",
+ e 0,
+ f "hello there, world\n",
+ left {
+ b '00'H,
+ d "\b",
+ e 0,
+ "hello there, world\n"
+ },
+ right {
+ b '00'H,
+ d '00'H,
+ e -1,
+ "hello there, world\n"
+ }
+}
+
+"Value Passing Defined types" t_test = 3
+{
+ "hello there, world\n",
+ b "Some one is out there!",
+ '00313233343536'H,
+ '0000000000110001001100100011'B,
+ [PRIVATE 577] '18'H,
+ '000100100011000100011010001101110010'B,
+ 9357,
+ 1.73205,
+ 1.17.42,
+ TRUE,
+ 4
+}
+
+"Value Passing Defined types" t_test = 2
+{
+ "hello there, world\n",
+ b "Some one is out there!",
+ '003132333435'H,
+ '00000000001100010011'B,
+ [PRIVATE 16] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ }
+ },
+ '00010010001100010001101000110111001'B,
+ 9356,
+ 1.41421,
+ 1.17,
+ FALSE,
+ 3
+}
+
+"Value Passing Defined types" t_test = 1
+{
+ "hello there, world\n",
+ b "Some one is out there!",
+ '0031323334'H,
+ '000000000011'B,
+ [PRIVATE 101] "\n",
+ '0001001000110001000110100011011100'B,
+ 9355,
+ 1,
+ 1.17,
+ TRUE,
+ 2
+}
+
+"Repeating pepy elements" t_test = 3
+{
+ a {
+ 6,
+ 3
+ },
+ b {
+ {
+ a 7,
+ b "The quick",
+ c '0011000'B
+ },
+ {
+ a 6,
+ b "brown",
+ c '001100'B
+ }
+ },
+ c {
+ 6,
+ 3
+ },
+ d {
+ {
+ a 10,
+ b "The quick",
+ c '0011000100'B
+ },
+ {
+ a 9,
+ b "brown",
+ c '001100010'B
+ },
+ {
+ a 8,
+ b "fox jumps over",
+ c '00110001'B
+ },
+ {
+ a 7,
+ b "The Lazy",
+ c '0011000'B
+ },
+ {
+ a 6,
+ b "dog",
+ c '001100'B
+ }
+ },
+ e {
+ -1
+ }
+}
+
+"Repeating pepy elements" t_test = 2
+{
+ a {
+ 3
+ },
+ b {
+ {
+ a 5,
+ b "The quick",
+ c '00110'B
+ }
+ },
+ c {
+ 3
+ },
+ d {
+ {
+ a 7,
+ b "The quick",
+ c '0011000'B
+ },
+ {
+ a 6,
+ b "brown",
+ c '001100'B
+ },
+ {
+ a 5,
+ b "fox jumps over",
+ c '00110'B
+ }
+ },
+ e {
+ "lets go home"
+ }
+}
+
+"Repeating pepy elements" t_test = 1
+{
+ a {},
+ b {},
+ c {},
+ d {
+ {
+ a 4,
+ b "The quick",
+ c '0011'B
+ }
+ },
+ e {
+ FALSE
+ }
+}
+
+"Compound S-types" t_test = 3
+{
+ a {},
+ b {
+ [2] 12357
+ },
+ c {},
+ d {
+ [4] 4
+ }
+}
+
+"Compound S-types" t_test = 2
+{
+ a {
+ 12356
+ },
+ b {},
+ c {
+ 3
+ },
+ d {}
+}
+
+"Compound S-types" t_test = 1
+{
+ a {},
+ b {
+ [2] 12355
+ },
+ c {},
+ d {
+ [4] 2
+ }
+}
+
+"Pepy Stuff" t_test = 3
+{
+ 12357,
+ 4,
+ "Some is out there!",
+ "hello, world\n",
+ '00313233343536'H,
+ '00010010001100010001101000110111001010100'B,
+ '0000000000110001001100100011'B,
+ TRUE,
+ 1.17.42,
+ 3.06998,
+ [PRIVATE 730] '0010'H,
+ {
+ [1] 12357,
+ 12357,
+ 4,
+ [4] 4,
+ "hello, world\n",
+ [8] "hello, world\n",
+ '00313233343536'H,
+ [10] '00313233343536'H,
+ 1.17.42,
+ [18] 1.17.42,
+ 3.06998,
+ [20] 3.06998,
+ [21] '0010'H
+ },
+ [13] {
+ [2] 12357,
+ [4] 4,
+ "Some is out there!",
+ [6] "Some is out there!",
+ "hello, world\n",
+ [8] "hello, world\n",
+ '00313233343536'H,
+ [10] '00313233343536'H,
+ '00010010001100010001101000110111001010101'B,
+ [12] '00010010001100010001101000110111001010101'B,
+ '00000000001100010011001000110011'B,
+ [16] TRUE,
+ 1.17.42,
+ 3.06998,
+ [PRIVATE 730] '0010'H
+ }
+}
+
+"Pepy Stuff" t_test = 2
+{
+ 12356,
+ 3,
+ "Some is out there!",
+ "hello, world\n",
+ '003132333435'H,
+ '00010010001100010001101000110111001010100'B,
+ '00000000001100010011'B,
+ FALSE,
+ 1.17,
+ 2.50663,
+ [PRIVATE 362] 'ff'H,
+ {
+ [1] 12356,
+ 12356,
+ "hello, world\n",
+ [8] "hello, world\n",
+ '003132333435'H,
+ [10] '003132333435'H,
+ '000000000011000100110010'B,
+ FALSE,
+ [16] FALSE,
+ 1.17,
+ [18] 1.17,
+ 2.50663,
+ [20] 2.50663,
+ [21] 'ff'H
+ },
+ [13] {
+ 12356,
+ 3,
+ "Some is out there!",
+ [6] "Some is out there!",
+ "hello, world\n",
+ [8] "hello, world\n",
+ '003132333435'H,
+ [10] '003132333435'H,
+ '00010010001100010001101000110111001010101'B,
+ [12] '00010010001100010001101000110111001010101'B,
+ '000000000011000100110010'B,
+ FALSE,
+ 1.17,
+ [19] 2.50663,
+ [PRIVATE 362] 'ff'H
+ }
+}
+
+"Pepy Stuff" t_test = 1
+{
+ 12355,
+ 2,
+ "Some is out there!",
+ "hello, world\n",
+ '0031323334'H,
+ '00010010001100010001101000110111001010100'B,
+ '000000000011'B,
+ TRUE,
+ 1.17,
+ 1.77245,
+ [PRIVATE 122] '0b'H,
+ {
+ [1] 12355,
+ 12355,
+ 2,
+ [4] 2,
+ "hello, world\n",
+ [8] "hello, world\n",
+ '0031323334'H,
+ [10] '0031323334'H,
+ '0000000000110001'B,
+ 1.17,
+ [18] 1.17,
+ 1.77245,
+ [20] 1.77245,
+ [21] '0b'H
+ },
+ [13] {
+ [2] 12355,
+ [4] 2,
+ "Some is out there!",
+ [6] "Some is out there!",
+ "hello, world\n",
+ [8] "hello, world\n",
+ '0031323334'H,
+ [10] '0031323334'H,
+ '00010010001100010001101000110111001010101'B,
+ [12] '00010010001100010001101000110111001010101'B,
+ '0000000000110001'B,
+ [16] TRUE,
+ 1.17,
+ 1.77245,
+ [PRIVATE 122] '0b'H
+ }
+}
+
+"Tests of Real type" t_test = 4
+{
+ r1 927640,
+ r2 0,
+ r3 -2.28789,
+ r4 927640
+}
+
+"Tests of Real type" t_test = 3
+{
+ r1 -2.28789,
+ r2 927640,
+ r3 0,
+ r4 3.1416,
+ r5 927640
+}
+
+"Tests of Real type" t_test = 2
+{
+ r1 0,
+ r2 -2.28789,
+ r3 927640,
+ r4 0,
+ r5 -2.28789
+}
+
+"Tests of Real type" t_test = 1
+{
+ r1 927640,
+ r2 0,
+ r3 -2.28789,
+ r4 3.1416
+}
+
+"Real" t_test = 3
+-2.28789
+
+"Real" t_test = 2
+0
+
+"Real" t_test = 1
+927640
+
+"Tests of Enumerated type" t_test = 4
+{
+ ae1 0,
+ ae2 1,
+ ae3 3,
+ ae4 -1,
+ ae5 -1
+}
+
+"Tests of Enumerated type" t_test = 3
+{
+ ae1 -1,
+ ae2 0,
+ ae3 1,
+ ae4 3
+}
+
+"Tests of Enumerated type" t_test = 2
+{
+ ae1 3,
+ ae2 -1,
+ ae3 0,
+ ae4 3,
+ ae5 1
+}
+
+"Tests of Enumerated type" t_test = 1
+{
+ ae1 1,
+ ae2 3,
+ ae3 -1,
+ ae4 0
+}
+
+"Enumerated Type" t_test = 4
+0
+
+"Enumerated Type" t_test = 3
+-1
+
+"Enumerated Type" t_test = 2
+3
+
+"Enumerated Type" t_test = 1
+1
+
+"Single Objects" t_test = 4
+{
+ st2 "xxxxxxx, world"
+}
+
+"Single Objects" t_test = 3
+{}
+
+"Single Objects" t_test = 2
+{
+ st2 "xxxxxxx, world"
+}
+
+"Single Objects" t_test = 1
+{
+ st2 "xxxxxxx, world"
+}
+
+"Explicit Tagged Objects" t_test = 3
+{
+ bE 40986
+}
+
+"Explicit Tagged Objects" t_test = 2
+{
+ aE 10283
+}
+
+"Explicit Tagged Objects" t_test = 1
+{
+ bE 40986
+}
+
+"Single EXTERNAL" t_test = 1
+{
+ direct-reference 1.17.222,
+ indirect-reference 16,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+}
+
+"EXTERNAL" t_test = 6
+{
+ ext {
+ direct-reference 1.17.474,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type '00'H
+ }
+ },
+ a-ny 'ff'H,
+ ext-impl {
+ direct-reference 1.17.366,
+ indirect-reference 40,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type '00'H
+ }
+ },
+ any-impl 'ff'H,
+ ext-expl {
+ direct-reference 1.17.258,
+ indirect-reference 12,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type '00'H
+ }
+ },
+ any-expl '0010'H
+}
+
+"EXTERNAL" t_test = 5
+{
+ ext {
+ direct-reference 1.17.402,
+ indirect-reference 12,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+ },
+ a-ny "mkpelist:testdata",
+ ext-impl {
+ direct-reference 1.17.312,
+ indirect-reference 16,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type 'ff'H
+ }
+ },
+ any-impl {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ },
+ [PRIVATE 16] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ }
+ },
+ [PRIVATE 325] '00'H,
+ [PRIVATE 362] 'ff'H,
+ [PRIVATE 401] '14'H,
+ [PRIVATE 442] '15'H,
+ [PRIVATE 485] "mkpelist:testdata",
+ [PRIVATE 530] 'ff'H,
+ [PRIVATE 577] '18'H,
+ [PRIVATE 626] '19'H,
+ [PRIVATE 677] "mkpelist:testdata",
+ [PRIVATE 730] '0010'H,
+ [PRIVATE 27] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ },
+ [PRIVATE 16] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ }
+ },
+ [PRIVATE 325] '00'H,
+ [PRIVATE 362] 'ff'H,
+ [PRIVATE 401] '14'H,
+ [PRIVATE 442] '15'H,
+ [PRIVATE 485] "mkpelist:testdata",
+ [PRIVATE 530] 'ff'H,
+ [PRIVATE 577] '18'H,
+ [PRIVATE 626] '19'H,
+ [PRIVATE 677] "mkpelist:testdata",
+ [PRIVATE 730] '0010'H
+ },
+ [PRIVATE 842] 'ff'H,
+ [PRIVATE 901] '1e'H,
+ [PRIVATE 962] "mkpelist:testdata",
+ [PRIVATE 1025] '00'H,
+ [PRIVATE 1090] "!",
+ [PRIVATE 1157] "mkpelist:testdata",
+ [PRIVATE 1226] '0010'H,
+ [PRIVATE 35] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ },
+ [PRIVATE 16] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ }
+ },
+ [PRIVATE 325] '00'H,
+ [PRIVATE 362] 'ff'H,
+ [PRIVATE 401] '14'H,
+ [PRIVATE 442] '15'H,
+ [PRIVATE 485] "mkpelist:testdata",
+ [PRIVATE 530] 'ff'H,
+ [PRIVATE 577] '18'H,
+ [PRIVATE 626] '19'H,
+ [PRIVATE 677] "mkpelist:testdata",
+ [PRIVATE 730] '0010'H,
+ [PRIVATE 27] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ },
+ [PRIVATE 16] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ }
+ },
+ [PRIVATE 325] '00'H,
+ [PRIVATE 362] 'ff'H,
+ [PRIVATE 401] '14'H,
+ [PRIVATE 442] '15'H,
+ [PRIVATE 485] "mkpelist:testdata",
+ [PRIVATE 530] 'ff'H,
+ [PRIVATE 577] '18'H,
+ [PRIVATE 626] '19'H,
+ [PRIVATE 677] "mkpelist:testdata",
+ [PRIVATE 730] '0010'H
+ },
+ [PRIVATE 842] 'ff'H,
+ [PRIVATE 901] '1e'H,
+ [PRIVATE 962] "mkpelist:testdata",
+ [PRIVATE 1025] '00'H,
+ [PRIVATE 1090] "!",
+ [PRIVATE 1157] "mkpelist:testdata",
+ [PRIVATE 1226] '0010'H
+ },
+ [PRIVATE 1370] 'ff'H,
+ [PRIVATE 1445] "&",
+ [PRIVATE 1522] "mkpelist:testdata",
+ [PRIVATE 1601] "(",
+ [PRIVATE 1682] "mkpelist:testdata",
+ [PRIVATE 1765] '0010'H
+ },
+ ext-expl {
+ direct-reference 1.17.222,
+ indirect-reference 16,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+ },
+ any-expl "mkpelist:testdata"
+}
+
+"EXTERNAL" t_test = 4
+{
+ ext {
+ direct-reference 1.17.330,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+ },
+ a-ny "!",
+ ext-impl {
+ direct-reference 1.17.258,
+ indirect-reference 12,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type '00'H
+ }
+ },
+ any-impl '0010'H,
+ ext-expl {
+ direct-reference 1.17.186,
+ indirect-reference 4,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+ },
+ any-expl 'ff'H
+}
+
+"EXTERNAL" t_test = 3
+{
+ ext {
+ direct-reference 1.17.258,
+ indirect-reference 12,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type '00'H
+ }
+ },
+ a-ny '19'H,
+ ext-impl {
+ direct-reference 1.17.204,
+ indirect-reference 32,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type 'ff'H
+ }
+ },
+ any-impl '0010'H,
+ ext-expl {
+ direct-reference 1.17.150,
+ indirect-reference 20,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type 'ff'H
+ }
+ },
+ any-expl 'ff'H
+}
+
+"EXTERNAL" t_test = 2
+{
+ ext {
+ direct-reference 1.17.186,
+ indirect-reference 4,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+ },
+ a-ny {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H,
+ [PRIVATE 15] {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b",
+ [PRIVATE 82] "\t",
+ [PRIVATE 101] "\n",
+ [PRIVATE 122] '0b'H,
+ [PRIVATE 145] "mkpelist:testdata",
+ [PRIVATE 170] "mkpelist:testdata",
+ [PRIVATE 197] '0010'H,
+ [PRIVATE 226] '0010'H
+ }
+ },
+ ext-impl {
+ direct-reference 1.17.150,
+ indirect-reference 20,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type 'ff'H
+ }
+ },
+ any-impl 'ff'H,
+ ext-expl {
+ direct-reference 1.17.114,
+ indirect-reference 16,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+ },
+ any-expl '15'H
+}
+
+"EXTERNAL" t_test = 1
+{
+ ext {
+ direct-reference 1.17.114,
+ indirect-reference 16,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+ },
+ a-ny "\t",
+ ext-impl {
+ direct-reference 1.17.96,
+ indirect-reference 28,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ single-ASN1-type '00'H
+ }
+ },
+ any-impl '0b'H,
+ ext-expl {
+ direct-reference 1.17.78,
+ indirect-reference 48,
+ data-value-descriptor '4120766572792077696c642074797065206f66206461746100'H,
+ encoding {
+ octet-aligned '536f6d652074657374206461746100'H
+ }
+ },
+ any-expl "mkpelist:testdata"
+}
+
+"Optimised" t_test = 8
+{
+ o1 '0001010000110001000100100011011100011010'B,
+ o2 "Peckling Worsley!!!!",
+ o3 {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ o4 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b"
+ },
+ {
+ o5 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b"
+ },
+ o6 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H,
+ [PRIVATE 65] "\b"
+ },
+ o7 1.17
+ }
+}
+
+"Optimised" t_test = 7
+{
+ o1 '0001010000110001000100100011011100011010'B,
+ o2 "Peckling Worsley!!!!",
+ o3 {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ o4 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H
+ },
+ {
+ o5 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H
+ },
+ o6 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H,
+ [PRIVATE 50] 'ff'H
+ },
+ o7 1.17
+ }
+}
+
+"Optimised" t_test = 6
+{
+ o1 '0001010000110001000100100011011100011010'B,
+ o2 "Peckling Worsley!!!!",
+ o3 {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ o4 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H
+ },
+ {
+ o5 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H
+ },
+ o6 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H,
+ [PRIVATE 37] '00'H
+ },
+ o7 1.17
+ }
+}
+
+"Optimised" t_test = 5
+{
+ o1 '0001010000110001000100100011011100011010'B,
+ o2 "Peckling Worsley!!!!",
+ o3 {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ o4 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H
+ },
+ {
+ o5 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H
+ },
+ o6 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H,
+ [PRIVATE 26] 'ff'H
+ },
+ o7 1.17.48.53.58
+ }
+}
+
+"Optimised" t_test = 4
+{
+ o1 '0001010000110001000100100011011100011010'B,
+ o2 "Peckling Worsley!!!!",
+ o3 {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ o4 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H
+ },
+ {
+ o5 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H
+ },
+ o6 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H,
+ [PRIVATE 17] '00'H
+ },
+ o7 1.17.45.49
+ }
+}
+
+"Optimised" t_test = 3
+{
+ o1 '0001010000110001000100100011011100011010'B,
+ o2 "Peckling Worsley!!!!",
+ o3 {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ o4 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H
+ },
+ {
+ o5 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H
+ },
+ o6 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H,
+ [PRIVATE 10] 'ff'H
+ },
+ o7 1.17.42
+ }
+}
+
+"Optimised" t_test = 2
+{
+ o1 '0001010000110001000100100011011100011010'B,
+ o2 "Peckling Worsley!!!!",
+ o3 {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ o4 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H
+ },
+ {
+ o5 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H
+ },
+ o6 {
+ [PRIVATE 2] 'ff'H,
+ [PRIVATE 5] '00'H
+ },
+ o7 1.17
+ }
+}
+
+"Optimised" t_test = 1
+{
+ o1 '0001010000110001000100100011011100011010'B,
+ o2 "Peckling Worsley!!!!",
+ o3 {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ o4 {
+ [PRIVATE 2] 'ff'H
+ },
+ {
+ o5 {
+ [PRIVATE 2] 'ff'H
+ },
+ o6 {
+ [PRIVATE 2] 'ff'H
+ },
+ o7 1.17
+ }
+}
+
+"External References" t_test = 6
+{
+ a-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ b-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ c-ref {
+ c1 {
+ o-c1 '416e6472657720576f72736c657921212100'H
+ },
+ c2 {
+ b-c2 '0000001000000001000000010000011100111111'B
+ },
+ c3 {
+ seq-c3 {
+ seq-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ seq-c3-i 40938,
+ seq-c3-o '4a616d657320576f72736c65792121212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ sc-b-i 13151
+ }
+ }
+ }
+}
+
+"External References" t_test = 5
+{
+ a-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ b-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ c-ref {
+ c1 {
+ i-c1 10101
+ },
+ c2 {
+ o-c2 '5269636861726420576f72736c6579212100'H
+ },
+ c3 {
+ i-c3 689364
+ },
+ c4 {
+ c4-choice {
+ sc-a-i 16891
+ }
+ }
+ },
+ e-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ }
+}
+
+"External References" t_test = 4
+{
+ a-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ b-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ c-ref {
+ c1 {
+ obj-c1 {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ }
+ },
+ c2 {
+ i-c2 1212
+ },
+ c3 {
+ set-c3 {
+ set-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ set-c3-i 264504,
+ set-c3-o '5061747269636b20576f72736c6579212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ c4-obj {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ }
+ }
+ }
+}
+
+"External References" t_test = 3
+{
+ a-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ b-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ c-ref {
+ c1 {
+ f-c1 TRUE
+ },
+ c2 {
+ obj-c2 {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ }
+ },
+ c3 {
+ seq-c3 {
+ seq-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ seq-c3-i 40938,
+ seq-c3-o '4a616d657320576f72736c65792121212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ c4-i 10938
+ }
+ }
+ },
+ e-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ }
+}
+
+"External References" t_test = 2
+{
+ a-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ b-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ c-ref {
+ c1 {
+ b-c1 '0000001000000010000000100000011100111111'B
+ },
+ c2 {
+ f-c2 TRUE
+ },
+ c3 {
+ i-c3 689364
+ },
+ c4 {
+ c4-choice {
+ sc-b-i 13151
+ }
+ }
+ }
+}
+
+"External References" t_test = 1
+{
+ a-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ b-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ },
+ c-ref {
+ c1 {
+ o-c1 '416e6472657720576f72736c657921212100'H
+ },
+ c2 {
+ b-c2 '0000001000000001000000010000011100111111'B
+ },
+ c3 {
+ set-c3 {
+ set-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ set-c3-i 264504,
+ set-c3-o '5061747269636b20576f72736c6579212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ sc-a-i 16891
+ }
+ }
+ },
+ e-ref {
+ a1 101910,
+ a2 -304985,
+ a3 13,
+ a4 {
+ a-seq {
+ fred 998877
+ }
+ }
+ }
+}
+
+"Default test" t_test = 12
+{
+ a-def 1,
+ okay FALSE,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-def {
+ colour 1,
+ version { basic }
+ },
+ st-def {
+ beer 2,
+ spirit 0
+ }
+}
+
+"Default test" t_test = 11
+{
+ a-def 1,
+ c-def '100000000'B,
+ okay FALSE,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ }
+}
+
+"Default test" t_test = 10
+{
+ a-def 1,
+ b-def '537573616e20536962656c202121212100'H,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-def {
+ colour 1,
+ oem-oct '4a756c696120447a75696b6173202121212100'H,
+ version { basic }
+ }
+}
+
+"Default test" t_test = 9
+{
+ a-def 1,
+ okay FALSE,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ st-def {}
+}
+
+"Default test" t_test = 8
+{
+ a-def 1,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-def {
+ colour 1,
+ version { basic }
+ },
+ st-def {
+ beer 2,
+ spirit 0
+ }
+}
+
+"Default test" t_test = 7
+{
+ a-def 1,
+ okay FALSE,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ st-def {
+ wine 2,
+ beer 2
+ }
+}
+
+"Default test" t_test = 6
+{
+ a-def 1,
+ b-def '537573616e20536962656c202121212100'H,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ st-def {}
+}
+
+"Default test" t_test = 5
+{
+ a-def 1,
+ c-def '100000000'B,
+ okay FALSE,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ }
+}
+
+"Default test" t_test = 4
+{
+ a-def 1,
+ okay FALSE,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-def {
+ colour 1,
+ version { basic }
+ },
+ st-def {
+ beer 2,
+ spirit 0
+ }
+}
+
+"Default test" t_test = 3
+{
+ a-def 1,
+ c-def '100000000'B,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ st-def {}
+}
+
+"Default test" t_test = 2
+{
+ a-def 1,
+ b-def '537573616e20536962656c202121212100'H,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-def {
+ colour 1,
+ version { basic }
+ },
+ st-def {
+ spirit 0
+ }
+}
+
+"Default test" t_test = 1
+{
+ a-def 1,
+ big-def {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-def {
+ version { basic }
+ },
+ st-def {
+ beer 2,
+ spirit 0
+ }
+}
+
+"Optional test" t_test = 8
+{
+ b-opt '537573616e2048616e6e616820536962656c00'H,
+ etag-opt 2983461
+}
+
+"Optional test" t_test = 7
+{
+ a-opt 192837,
+ b-opt '537573616e2048616e6e616820536962656c00'H,
+ d-opt TRUE,
+ e-opt NULL,
+ big-opt {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-opt {
+ oem-int 197336,
+ oem-oct '4c696e6720576f72736c657900'H
+ },
+ st-opt {
+ st-int0 85659,
+ st-int2 967768
+ },
+ obj-opt {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ ch-opt {
+ ch-2 28828
+ }
+}
+
+"Optional test" t_test = 6
+{
+ b-opt '537573616e2048616e6e616820536962656c00'H,
+ c-opt '0000101000001111000000100000011100111111'B,
+ d-opt TRUE,
+ e-opt NULL
+}
+
+"Optional test" t_test = 5
+{
+ a-opt 192837,
+ b-opt '537573616e2048616e6e616820536962656c00'H,
+ c-opt '0000101000001111000000100000011100111111'B,
+ e-opt NULL,
+ big-opt {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-opt {
+ oem-int 197336,
+ oem-oct '4c696e6720576f72736c657900'H
+ },
+ st-opt {
+ st-int0 85659,
+ st-int2 967768
+ },
+ obj-opt {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ ch-opt {
+ ch-2 28828
+ }
+}
+
+"Optional test" t_test = 4
+{
+ b-opt '537573616e2048616e6e616820536962656c00'H,
+ e-opt NULL
+}
+
+"Optional test" t_test = 3
+{
+ a-opt 192837,
+ b-opt '537573616e2048616e6e616820536962656c00'H,
+ d-opt TRUE,
+ big-opt {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-opt {
+ oem-int 197336,
+ oem-oct '4c696e6720576f72736c657900'H
+ },
+ st-opt {
+ st-int0 85659,
+ st-int2 967768
+ },
+ obj-opt {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ ch-opt {
+ ch-2 28828
+ }
+}
+
+"Optional test" t_test = 2
+{
+ b-opt '537573616e2048616e6e616820536962656c00'H,
+ c-opt '0000101000001111000000100000011100111111'B,
+ d-opt TRUE
+}
+
+"Optional test" t_test = 1
+{
+ a-opt 192837,
+ b-opt '537573616e2048616e6e616820536962656c00'H,
+ c-opt '0000101000001111000000100000011100111111'B,
+ big-opt {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-opt {
+ oem-int 197336,
+ oem-oct '4c696e6720576f72736c657900'H
+ },
+ st-opt {
+ st-int0 85659,
+ st-int2 967768
+ },
+ obj-opt {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ ch-opt {
+ ch-2 28828
+ }
+}
+
+"Choice" t_test = 7
+{
+ c1 {
+ b-c1 '0000001000000010000000100000011100111111'B
+ },
+ c2 {
+ f-c2 TRUE
+ },
+ c3 {
+ set-c3 {
+ set-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ set-c3-i 264504,
+ set-c3-o '5061747269636b20576f72736c6579212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ c4-i 10938
+ }
+ }
+}
+
+"Choice" t_test = 6
+{
+ c1 {
+ o-c1 '416e6472657720576f72736c657921212100'H
+ },
+ c2 {
+ b-c2 '0000001000000001000000010000011100111111'B
+ },
+ c3 {
+ seq-c3 {
+ seq-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ seq-c3-i 40938,
+ seq-c3-o '4a616d657320576f72736c65792121212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ sc-b-i 13151
+ }
+ }
+}
+
+"Choice" t_test = 5
+{
+ c1 {
+ i-c1 10101
+ },
+ c2 {
+ o-c2 '5269636861726420576f72736c6579212100'H
+ },
+ c3 {
+ i-c3 689364
+ },
+ c4 {
+ c4-choice {
+ sc-a-i 16891
+ }
+ }
+}
+
+"Choice" t_test = 4
+{
+ c1 {
+ obj-c1 {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ }
+ },
+ c2 {
+ i-c2 1212
+ },
+ c3 {
+ set-c3 {
+ set-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ set-c3-i 264504,
+ set-c3-o '5061747269636b20576f72736c6579212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ c4-obj {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ }
+ }
+}
+
+"Choice" t_test = 3
+{
+ c1 {
+ f-c1 TRUE
+ },
+ c2 {
+ obj-c2 {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ }
+ },
+ c3 {
+ seq-c3 {
+ seq-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ seq-c3-i 40938,
+ seq-c3-o '4a616d657320576f72736c65792121212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ c4-i 10938
+ }
+ }
+}
+
+"Choice" t_test = 2
+{
+ c1 {
+ b-c1 '0000001000000010000000100000011100111111'B
+ },
+ c2 {
+ f-c2 TRUE
+ },
+ c3 {
+ i-c3 689364
+ },
+ c4 {
+ c4-choice {
+ sc-b-i 13151
+ }
+ }
+}
+
+"Choice" t_test = 1
+{
+ c1 {
+ o-c1 '416e6472657720576f72736c657921212100'H
+ },
+ c2 {
+ b-c2 '0000001000000001000000010000011100111111'B
+ },
+ c3 {
+ set-c3 {
+ set-c3-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ set-c3-i 264504,
+ set-c3-o '5061747269636b20576f72736c6579212100'H
+ }
+ },
+ c4 {
+ c4-choice {
+ sc-a-i 16891
+ }
+ }
+}
+
+"SEQ OF and SET OF" t_test = 10
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 9
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 8
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 7
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 6
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 5
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 4
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 3
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 2
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"SEQ OF and SET OF" t_test = 1
+{
+ sqof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ stof-test1 {
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ }
+ },
+ i-test1 33,
+ sqof-test2 {
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ },
+ {
+ sqof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ sqof-i 212121,
+ sqof-o '456c656d656e743820456d62656464656400'H
+ }
+ },
+ stof-test2 {
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ },
+ {
+ stof-in {
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+ },
+ stof-i -12345,
+ stof-o '58595a616263646520456d62656464656400'H
+ }
+ },
+ i-test2 99
+}
+
+"Explicit tags" t_test = 1
+{
+ i-expl 35051,
+ o-expl "explicit tagged octet string",
+ b-expl '00111000001110000011100000111111'B,
+ f-expl TRUE,
+ obj-expl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-exp-test {
+ i-ex-int -9,
+ i-ex-oct '4578706c6963697420456d62656464656400'H,
+ i-ex-bit '0000001100000011000000110000001110111111'B
+ }
+}
+
+"Implicit tags" t_test = 1
+{
+ i-impl -1,
+ o-impl '49276d20616e20696d706c6963697420746167676564206f6374657420737472696e6700'H,
+ b-impl '0000000000000000000000011001100000000001'B,
+ f-impl TRUE,
+ obj-impl {
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+ },
+ i-emb-test {
+ i-em-int -101,
+ i-em-oct '496d706c6963697420456d62656464656400'H,
+ i-em-bit '10000000100000001000000010000000'B
+ }
+}
+
+"Embedded Strings" t_test = 1
+{
+ atest 2001,
+ btest "Good bye",
+ ctest '000000110000100010101010'B,
+ big-test {
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+ },
+ emb-test {
+ em-int -101,
+ em-oct "Embedded octet string",
+ em-bit '1111111110101010010101011111100000000001'B
+ }
+}
+
+"Strings" t_test = 1
+{
+ ostring '3132fe00ff6136'H,
+ bstring '10111000000011110000100000010000001000000100000000'B,
+ nstring "123456",
+ pstring "hello, world",
+ tstring "teletex",
+ t61string "T.61",
+ vstring "visible",
+ vis-string "visible again",
+ i646string "who knows what this is",
+ ia5string "This is ASCII\n\r",
+ graphstring "This is a graphic string",
+ genstring "This is a general string"
+}
+
+"Embedded" t_test = 1
+{
+ anMPDU {
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+ },
+ ei 6966
+}
+
+"MPDU" t_test = 1
+{
+ a-seq {
+ fred 10,
+ george TRUE
+ }
+}
+Total 107 = 107 successes 0 failures