anchor.diff:      end.
   
   try_ebin_dirs([Ebin|Ebins]) ->
  -    case erl_prim_loader:read_file_info(Ebin) of
  -	{ok,#file_info{type=directory}} -> 
  -	    {ok,Ebin};
  -	_ ->
  -	    try_ebin_dirs(Ebins)
  +    case is_dir(Ebin) of
  +	true -> {ok,Ebin};
  +	false -> try_ebin_dirs(Ebins)
       end;
   try_ebin_dirs([]) ->
       error.
  
positive.code: do_soft_purge(Mod) ->
      erts_code_purger:soft_purge(Mod).
  
  
  %%%
  %%% Loading of multiple modules in parallel.
  
negative.code:     Dir = filename:append(BundleDir, Bundle),
      Ebin = filename:append(Dir, "ebin"),
      %% First try with /ebin
      case is_dir(Ebin) of
  	true ->
  	    make_path(BundleDir, Tail, [Ebin|Res]);
  	false ->
  	    %% Second try with archive
  	    Ext = archive_extension(),
  	    Base = filename:basename(Bundle, Ext),
  