anchor.diff:       {'ABSTRACT-SYNTAX',
         #objectclass{fields=[{fixedtypevaluefield,
   			    id,
  -			    #type{tag=?TAG_PRIMITIVE(?N_OBJECT_IDENTIFIER),
  +			    #type{tag=[?TAG_PRIMITIVE(?N_OBJECT_IDENTIFIER)],
   				  def='OBJECT IDENTIFIER'},
   			    'UNIQUE',
   			    'MANDATORY'},
   			   {typefield,'Type','MANDATORY'},
   			   {fixedtypevaluefield,
   			    property,
  -			    #type{tag=?TAG_PRIMITIVE(?N_BIT_STRING),
  +			    #type{tag=[?TAG_PRIMITIVE(?N_BIT_STRING)],
   				  def={'BIT STRING',[]}},
   			    undefined,
   			    {'DEFAULT',
  
positive.code: 	    ok
      end.
  
  default_class_list(S) ->
      [{'TYPE-IDENTIFIER',
        #objectclass{fields=[{fixedtypevaluefield,
  			    id,
  			    #type{tag=?TAG_PRIMITIVE(?N_OBJECT_IDENTIFIER),
  				  def='OBJECT IDENTIFIER'},
  			    'UNIQUE',
  			    'MANDATORY'},
  
negative.code: 			NewExt = ExtRef#'Externaltypereference'{module=merged_mod(S,RefMod,Ext)},
  			TempNewDef#newt{
  			  type = check_externaltypereference(S,NewExt),
  			  tag = merge_tags(Ct,RefType#type.tag)}
  		end;
  	    'ANY' ->
  		Ct=maybe_illicit_implicit_tag(open_type,Tag),
  