anchor.diff:      case get(instance_of) of
   	undefined ->
   	    AssociateSeq = iof_associated_type1(S,[]),
  -	    Tag =
  -		case S#state.erule of
  -		    ber ->
  -			[?TAG_CONSTRUCTED(?N_INSTANCE_OF)];
  -		    _ -> []
  -		end,
  +	    Tag = [?TAG_CONSTRUCTED(?N_INSTANCE_OF)],
   	    TypeDef=#typedef{checked=true,
   			     name='INSTANCE OF',
   			     typespec=#type{tag=Tag,
  
positive.code: 	    [] -> 'ASN1_OPEN_TYPE';
  	    _ -> {typefield,'Type'}
  	end,
      {ObjIdTag,C1TypeTag}=
  	case S#state.erule of
  	    ber ->
  		{[{'UNIVERSAL',8}],
  		 [#tag{class='UNIVERSAL',
  		       number=6,
  		       type='IMPLICIT',
  		       form=0}]};
  	    _ -> {[{'UNIVERSAL','INTEGER'}],[]}
  	end,
      TypeIdentifierRef=#'Externaltypereference'{module=ModuleName,
  					       type='TYPE-IDENTIFIER'},
      ObjectIdentifier =
  
negative.code: 
  include_default_class(S, Module) ->
      _ = [include_default_class1(S, Module, ClassDef) ||
  	    ClassDef <- default_class_list()],
  	ok.
  
  include_default_class1(S, Module, {Name,Ts0}) ->
  