anchor.diff:  				       FI#file_info{mode = NewMode2}),
    	?line {ok,#file_info{mode = NewMode2}} = 
   	          Mod:read_file_info([956,965,963,954,959,49]),
  -	?line NumOK0 = case has_links() of
  -			  true -> 5;
  -			  false -> 3
  -		      end,
  -	?line NumNOK0 = case has_links() of
  -			   true -> 4;
  -			   false -> 3
  -		       end,
  -	?line {NumOK,NumNOK} = case is_binary(treat_icky(<<"foo">>)) of
  -				   false ->
  -				       {NumOK0+NumNOK0,0};
  -				   true ->
  -				       {NumOK0,NumNOK0}
  -			       end,
  -	?line {NumOK,NumNOK} = filelib:fold_files(".",".*",true,fun(_F,{N,M}) when is_list(_F) ->  io:format("~ts~n",[_F]),{N+1,M}; (_F,{N,M}) ->  io:format("~p~n",[_F]),{N,M+1} end,{0,0}),
  -	?line ok = filelib:fold_files(".",[1076,1089,1072,124,46,42],true,fun(_F,_) -> ok end,false),
   	ok
       catch
   	throw:need_unicode_mode ->
  
positive.code:  	?line Syms = [ {S,conv(Targ),list_to_binary(get_data(Targ,icky_dir()))} 
   		 || {T,S,Targ} <- icky_dir(), T =:= symlink ],
   	?line [ {ok, Cont} = Mod:read_file(SymL) || {SymL,_,Cont} <- Syms ],
   	?line [ {ok, Targ} = fixlink(Mod:read_link(SymL)) || {SymL,Targ,_} <- Syms ],
          ?line chk_cre_dir(Mod,[{directory,"åäö_dir",icky_dir()}]),
   	?line {ok,BeginAt} = Mod:get_cwd(),
   	?line true = is_list(BeginAt),
  
negative.code:     case  Mod:read_link_info(Dir) of
  	{ok, #file_info{type = directory}} ->
  	    {ok,#file_info{type = directory}} =  Mod:read_file_info(Dir),
  	    {ok, Content} = Mod:list_dir_all(Dir),
  	    UniMode = file:native_name_encoding() =/= latin1,
  	    [ true = (is_list(Part) orelse UniMode) || Part <- Content ],
  	    [ true = (is_list(filename:join(Dir,Part)) orelse UniMode) || Part <- Content ],
  