anchor.diff:      case Type#type.def of
   	#'ObjectClassFieldType'{type={typefield,_}} ->
   	    emit([Sep0,Pos," ->",nl]),
  -	    gen_dec_line(Erule, TopType, H, Pos+1, Ext);
  +	    gen_dec_choice_line(Erule, TopType, H, Pos+1, Ext);
   	_ ->
   	    emit([Sep0,Pos," -> {",{asis,Cname},",",nl]),
  -	    gen_dec_line(Erule, TopType, H, Pos+1, Ext),
  +	    gen_dec_choice_line(Erule, TopType, H, Pos+1, Ext),
   	    emit("}")
       end,
       Sep = [";",nl],
  
positive.code: 		    emit([indent(6),{curr,tmpterm},nl]),
  		    emit([indent(2),"end"]),
  		    if
  			Ext == noext andalso Prop == mandatory ->
  			    ok;
  			true ->
  			    emit([",",nl,{curr,tmpbytes},"}"])
  
negative.code: 	    _  ->
  		asn1ct_gen:get_inner(Type#type.def)
  	end,
      Decode = gen_dec_line_special(Erule, Atype, TopType, Comp, DecInfObj),
      Post =
  	fun({SaveBytes,Finish}) ->
  		{AccTerm,AccBytes} = Finish(),
  