anchor.diff:      [b2a(M), b2a(F) | bs2ss(Args)].
   
   b2a(Bin) when is_binary(Bin) ->
  -    list_to_atom(binary_to_list(Bin));
  +    list_to_atom(b2s(Bin));
   b2a(A) when is_atom(A) ->
       A.
   
   b2s(Bin) when is_binary(Bin) ->
  -    binary_to_list(Bin);
  +    try
  +	unicode:characters_to_list(Bin,file:native_name_encoding())
  +    catch
  +	_:_ -> binary_to_list(Bin)
  +    end;
   b2s(L) when is_list(L) ->
       L.
   
  
positive.code:     [].
  
  to_strings([H|T]) when is_atom(H) -> [atom_to_list(H)|to_strings(T)];
  to_strings([H|T]) when is_binary(H) -> [try
  					    unicode:characters_to_list(H,file:native_name_encoding())
  					catch
  					    _:_ -> binary_to_list(H)
  					end|to_strings(T)];
  to_strings([])    -> [].
  
  get_argument(Arg,Flags) ->
  
negative.code: %%
  %% %CopyrightBegin%
  %%
  %% Copyright Ericsson AB 1996-2013. All Rights Reserved.
  %%
  %% The contents of this file are subject to the Erlang Public License,
  %% Version 1.1, (the "License"); you may not use this file except in
  