anchor.diff:      wait_for_kernel_safe_sup(),
       case history_status() of
           enabled ->
  -            try open_log() of
  +            %% If the size option were included the log file would be
  +            %% silently resized. If the log file does not exist, a
  +            %% {badarg, size} error is returned and a new log file
  +            %% created. If the file exists, the log file is resized if
  +            %% needed, with a size warning.
  +            try open_log_no_size() of
                   {ok, ?LOG_NAME} ->
  -                    read_full_log(?LOG_NAME);
  +                    maybe_resize_log(?LOG_NAME);
                   {repaired, ?LOG_NAME, {recovered, Good}, {badbytes, Bad}} ->
                       report_repairs(?LOG_NAME, Good, Bad),
                       read_full_log(?LOG_NAME);
  
positive.code: resize_log(Name, _OldSize, NewSize) ->
      show('$#erlang-history-resize-attempt',
           "Attempting to resize the log history file to ~p...", [NewSize]),
      Opts = lists:keydelete(size, 1, log_options()),
      _ = case disk_log:open(Opts) of
          {error, {need_repair, _}} ->
              _ = repair_log(Name),
              disk_log:open(Opts);
          _ ->
              ok
      end,
      case disk_log:change_size(Name, NewSize) of
          ok ->
              show('$#erlang-history-resize-result',
                   "ok~n", []);
          {error, {new_size_too_small, _, _}} ->
              show('$#erlang-history-resize-result',
                   "failed (new size is too small)~n", []),
              disable_history();
  
negative.code: 
  %% Repair the log out of band
  repair_log(Name) ->
      case open_log_no_size() of
          {repaired, ?LOG_NAME, {recovered, Good}, {badbytes, Bad}} ->
              report_repairs(?LOG_NAME, Good, Bad);
          _ ->
  