anchor.diff:      {ok, Bin} = file:read_file(File),
       S = erlang:binary_to_list(Bin),
   	case WithLayout of 
  -		true -> {ok, Ts, _} = refac_scan_with_layout:string(S, {1,1}, TabWidth),
  +		true -> {ok, Ts, _} = refac_scan_with_layout:string(S, {1,1}, TabWidth, file_format(File)),
   				Ts;
  -		_ -> {ok, Ts, _} = refac_scan:string(S, {1,1}, TabWidth),
  +		_ -> {ok, Ts, _} = refac_scan:string(S, {1,1}, TabWidth,file_format(File)),
   			 Ts
   	end.
   
  
positive.code: 	     true -> [Tree];
  	     _ ->
  		 Ts = refac_syntax:subtrees(Tree),
  		 R0 = [[pos_to_syntax_units_1(T, Start, End, F) || T <- G]
  		       || G <- Ts],
  		 lists:append(R0)
  	   end;
         (S > End) or (E < Start) -> [];
         (S < Start) or (E > End) ->
  	   Ts = refac_syntax:subtrees(Tree),
  	   R0 = [[pos_to_syntax_units_1(T, Start, End, F) || T <- G]
  		 || G <- Ts],
  	   lists:append(R0);
  
negative.code:      case T of 
  	 {atom, _,  V} -> S = io_lib:write_atom(V), 
  			  concat_toks(Ts, [S|Acc]);
  	 {qatom, _, V} -> S=atom_to_list(V),
  			  concat_toks(Ts, [S|Acc]);
  	{string, _, V} -> concat_toks(Ts,[io_lib:write_string(V)|Acc]);
         	{char, _, V} when is_integer(V)-> concat_toks(Ts,[io_lib:write_char(V)|Acc]);
  