Skip to content

Commit cff0df3

Browse files
committed
Backport to gfortran 11
1 parent c14fe55 commit cff0df3

1 file changed

Lines changed: 3 additions & 0 deletions

File tree

src/assert_m.F90

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -151,6 +151,9 @@ pure subroutine assert_always(assertion, description, file, line)
151151
! workaround a defect observed in LFortran 0.54:
152152
! error stop with an allocatable character argument prints garbage
153153
error stop message//'', QUIET=.false.
154+
#elif __GNUC__ && __GNUC__ < 12
155+
! old GFortran lacks the QUIET optional arg added in F2018
156+
error stop message
154157
#else
155158
error stop message, QUIET=.false.
156159
#endif

0 commit comments

Comments
 (0)