anchor.diff:      end.
   
   io_to_fun(Str) ->
  -    Fun = erl_value(Str), 
  -    if
  -        is_function(Fun) -> 
  +    Fun = erl_value(Str),
  +    if
  +        is_function(Fun) ->
               Fun;
  -        true ->                 
  +        true ->
               ?ClientError({"Data conversion format error",{'fun',Str}})
       end.
   
   io_to_fun(Str,Len) ->
  -    Fun = erl_value(Str), 
  -    if
  -        Len == undefined ->     Fun; 
  +    Fun = erl_value(Str),
  +    if
  +        Len == undefined ->     Fun;
           is_function(Fun,Len) -> Fun;
  -        true ->                 
  +        true ->
               ?ClientError({"Data conversion format error",{'fun',Len,Str}})
       end.
   
   io_to_fun(Str,Len,Bindings) ->
  -    Fun = erl_value(Str,Bindings), 
  -    if
  -        Len == undefined ->     Fun; 
  +    Fun = erl_value(Str,Bindings),
  +    if
  +        Len == undefined ->     Fun;
           is_function(Fun,Len) -> Fun;
  -        true ->                 
  +        true ->
               ?ClientError({"Data conversion format error",{'fun',Len,Str,Bindings}})
       end.
   
  -erl_value(String) when is_binary(String) -> erl_value(binary_to_list(String),[]);  
  +erl_value(String) when is_binary(String) -> erl_value(binary_to_list(String),[]);
   erl_value(String) when is_list(String) -> erl_value(String,[]).
   
   erl_value(String,Bindings) when is_binary(String), is_list(Bindings) ->
  -    erl_value(binary_to_list(String),Bindings);  
  -erl_value(String,Bindings) when is_list(String), is_list(Bindings) -> 
  +    erl_value(binary_to_list(String),Bindings);
  +erl_value(String,Bindings) when is_list(String), is_list(Bindings) ->
       Code = case [lists:last(string:strip(String))] of
           "." -> String;
           _ -> String ++ "."
       end,
  -    {ok,ErlTokens,_} = erl_scan:string(Code),    
  +    {ok,ErlTokens,_} = erl_scan:string(Code),
       {ok,ErlAbsForm} = erl_parse:parse_exprs(ErlTokens),
       case catch erl_eval:exprs(ErlAbsForm, Bindings, none,
                                 {value, fun nonLocalHFun/2}) of
  
positive.code:             List = case unicode:characters_to_list(B, utf8) of
                  L when is_list(L) ->
                      lists:flatten(io_lib:format("~s",[un_escape_io(L)]));   %% Bin was utf8 encoded
                  _ ->                  
                      lists:flatten(io_lib:format("~s",[un_escape_io(B)]))    %% Bin is bytewise encoded
              end,
              if
  
negative.code:             ?ClientError({"Data conversion format error",{list,Len,Val}})
      end.
  
  io_to_tuple(Val,Len) ->
      case io_to_term(Val) of
          V when is_tuple(V) ->
              if
                  Len == undefined -> V;
                  Len == 0 ->         V;
                  size(V) == Len ->   V;
  