anchor.diff:              ok = file:rename(OutFileTmp, OutFile)
       end.
   
  -seq_gen_read_resume_value(Id) ->
  +seq_gen_read_resume_value(Id, MaxValue) ->
       case seq_gen_state_dir(Id) of
           "" ->
               0;
  
positive.code:                 InFile = Path ++ "/" ++ integer_to_list(Id),
                  {ok, Bin} = file:read_file(InFile),
                  Value = binary_to_term(Bin),
                  ?DEBUG("Id ~p resuming from value ~p\n", [Id, Value]),
                  Value
              catch
                  error:{badmatch, _} ->
                      0;
  
negative.code:    %% dictionary to keep track of where we are.
     case erlang:get({sigen, Ref}) of
         undefined ->
             seq_gen_put(Ref, seq_gen_read_resume_value(Id, MaxValue)),
             sequential_int_generator(Ref, MaxValue, Id, DisableProgress);
         MaxValue ->
             throw({stop, empty_keygen});
  