anchor.diff:      {Front, Rear} = lists_split(List, Size),
       transform_ldata(0, Rear, Sizes, [Front | R]).
   
  -transform_lfname(Names) ->
  -    [prim_file:internal_native2name(Name) || <<L:16,Name:L/binary>> <= Names].
  -
   lists_split(List, 0) when is_list(List) ->
       {[], List};
   lists_split(List, N) when is_list(List), is_integer(N), N < 0 ->
  
positive.code:     eof;
  translate_response(?FILE_RESP_FNAME, Data) when is_binary(Data) ->
      {ok, prim_file:internal_native2name(Data)};
  translate_response(?FILE_RESP_LFNAME, []) ->
      ok;
  translate_response(?FILE_RESP_LFNAME, Data) when is_binary(Data) ->
      {append, transform_lfname(Data)};
  translate_response(?FILE_RESP_ALL_DATA, Data) ->
      {ok, Data};
  translate_response(X, Data) ->
  
negative.code: %% Receives the response from a driver port.
  %% Returns: {ok, ListOrBinary}|{error, Reason}
  
  drv_get_response(Port, undefined) ->
      drv_get_response(Port);
  drv_get_response(Port, Fun) when is_function(Fun, 1) ->
      Fun(Port).
  
  drv_get_response(Port) ->
      erlang:bump_reductions(100),
  