Skip to content
This repository was archived by the owner on Aug 28, 2024. It is now read-only.

Commit

Permalink
Ditto on the last commit message
Browse files Browse the repository at this point in the history
  • Loading branch information
daminton committed Jan 3, 2023
1 parent 0fc24de commit eb4438e
Showing 1 changed file with 5 additions and 1 deletion.
6 changes: 5 additions & 1 deletion src/swiftest/swiftest_io.f90
Original file line number Diff line number Diff line change
Expand Up @@ -2769,7 +2769,11 @@ module subroutine swiftest_io_set_display_param(self, display_style)
self%display_unit = OUTPUT_UNIT !! stdout from iso_fortran_env
self%log_output = .false.
case ('COMPACT', 'PROGRESS')
open(unit=SWIFTEST_LOG_OUT, file=SWIFTEST_LOG_FILE, status=self%out_stat, err = 667, iomsg = errmsg)
if (self%lrestart) then
open(unit=SWIFTEST_LOG_OUT, file=SWIFTEST_LOG_FILE, status="OLD", position="APPEND", err = 667, iomsg = errmsg)
else
open(unit=SWIFTEST_LOG_OUT, file=SWIFTEST_LOG_FILE, status="REPLACE", err = 667, iomsg = errmsg)
end if
self%display_unit = SWIFTEST_LOG_OUT
self%log_output = .true.
case default
Expand Down

0 comments on commit eb4438e

Please sign in to comment.