anchor.diff:  %% File system and metadata.
   -export([get_cwd/0, get_cwd/1, set_cwd/1, delete/1, rename/2,
   	 make_dir/1, del_dir/1, list_dir/1,
  -	 read_file_info/1, write_file_info/2,
  +	 read_file_info/1, read_file_info/2,
  +	 write_file_info/2, write_file_info/3,
   	 altname/1,
  -	 read_link_info/1, read_link/1,
  +	 read_link_info/1, read_link_info/2, read_link/1,
   	 make_link/2, make_symlink/2,
   	 read_file/1, write_file/2, write_file/3]).
   %% Specialized
  
positive.code:       Reason :: posix() | badarg.
  
  read_link_info(Name) ->
      check_and_call(read_link_info, [file_name(Name)]).
  
  -spec read_link(Name) -> {ok, Filename} | {error, Reason} when
        Name :: name(),
  
negative.code:       Reason :: posix() | badarg.
  
  read_file_info(Name) ->
      file_info_time(local, check_and_call(read_file_info, [file_name(Name)])).
  
  read_file_info(Name, Opts) when is_list(Opts) ->
      file_info_time(proplists:get_value(time, Opts, local), check_and_call(read_file_info, [file_name(Name)])).
  
  -spec altname(Name :: name()) -> any().
  
  