diff options
Diffstat (limited to 'captain/log.f90')
| -rw-r--r-- | captain/log.f90 | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/captain/log.f90 b/captain/log.f90 index 2bc183f..70314c2 100644 --- a/captain/log.f90 +++ b/captain/log.f90 @@ -50,7 +50,9 @@ contains subroutine shutdown() implicit none - deallocate(logfile) + if(associated(logfile)) then + deallocate(logfile) + end if logfile => null() end subroutine shutdown |