added dummy parsing of CHOICE

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@13434 ec53bebd-3082-4978-b11e-865c3cabbd6b

lib/asn1/lex.l

@@ -65,6 +65,7 @@ BOOLEAN			{ return BOOLEAN; }
 IMPORTS			{ return IMPORTS; }
 FROM			{ return FROM; }
 SEQUENCE		{ return SEQUENCE; }
+CHOICE			{ return CHOICE; }
 OF			{ return OF; }
 OCTET			{ return OCTET; }
 STRING			{ return STRING; }

lib/asn1/parse.y

@@ -61,7 +61,7 @@ static void append (Member *l, Member *r);
   char *defval;
 }
 
-%token INTEGER SEQUENCE OF OCTET STRING GeneralizedTime GeneralString 
+%token INTEGER SEQUENCE CHOICE OF OCTET STRING GeneralizedTime GeneralString 
 %token BIT APPLICATION OPTIONAL EEQUAL TBEGIN END DEFINITIONS ENUMERATED
 %token UTF8String NULLTYPE
 %token EXTERNAL DEFAULT
@@ -163,6 +163,11 @@ type		: INTEGER     { $$ = new_type(TInteger); }
 		  $$ = new_type(TSequence);
 		  $$->members = $3;
 		}
+		| CHOICE '{' memberdecls '}'
+		{
+		  $$ = new_type(TChoice);
+		  $$->members = $3;
+		}
 		| BIT STRING '{' bitdecls '}'
 		{
 		  $$ = new_type(TBitString);