1-- $Id$ --
2
3CANTHANDLE DEFINITIONS ::= BEGIN
4
5-- Code the tag [1] but not the [ CONTEXT CONS UT_Sequence ] for Kaka2
6-- Workaround: use inline the structure directly
7-- Code the tag [2] but it should be primitive since KAKA3 is
8-- Workaround: use the INTEGER type directly
9
10Kaka2  ::= SEQUENCE {
11        kaka2-1 [0] INTEGER
12}
13
14Kaka3  ::= INTEGER
15
16Foo ::= SEQUENCE {
17        kaka1 [0] IMPLICIT INTEGER OPTIONAL,
18        kaka2 [1] IMPLICIT Kaka2 OPTIONAL,
19        kaka3 [2] IMPLICIT Kaka3 OPTIONAL
20}
21
22-- Don't code kaka if it's 1
23-- Workaround is to use OPTIONAL and check for in the encoder stubs
24
25Bar ::= SEQUENCE {
26        kaka [0] INTEGER DEFAULT 1
27}
28
29--  Can't handle primitives in SET OF
30--  Workaround is to define a type that is only an integer and use that
31
32Baz ::= SET OF INTEGER
33
34END
35