Skip to content

Commit 08cfc40

Browse files
committed
250910.003704.CST [skip ci] revise debug.F90
1 parent 7078233 commit 08cfc40

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

fortran/common/debug.F90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -8,7 +8,7 @@ module debug_mod
88
!
99
! Started: July 2020.
1010
!
11-
! Last Modified: Tue 09 Sep 2025 08:59:09 PM CST
11+
! Last Modified: Tue 09 Sep 2025 11:53:28 PM CST
1212
!--------------------------------------------------------------------------------------------------!
1313
implicit none
1414
private
@@ -100,7 +100,7 @@ subroutine errstop(srname, msg, code)
100100
integer, intent(in), optional :: code
101101

102102
! `backtr` prints a backtrace. With gfortran 12, even without calling `backtrace`, a backtrace is
103-
! printed when the program is stopped by an error stop, but this seems not the case with gfortran 14.
103+
! printed when the program is stopped by an error stop.
104104
call backtr()
105105

106106
write (STDERR, '(/A/)') 'ERROR: '//trim(adjustl(srname))//': '//trim(adjustl(msg))//'.'

0 commit comments

Comments
 (0)