From d1566aa5bf046b2dec255acf36388c34144120ed Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Sun, 22 Sep 2019 16:02:23 -0700 Subject: [PATCH] GNU 8 has issues with IEEE_infinite errors occur when running aggressively optimized code. GNU 9.1 seems to be ok --- PRIVATE | 2 +- src/rotations.f90 | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/PRIVATE b/PRIVATE index 2724ab446..43c6aeef7 160000 --- a/PRIVATE +++ b/PRIVATE @@ -1 +1 @@ -Subproject commit 2724ab446feb3737e6dfae4cc6aced1aa1d9add4 +Subproject commit 43c6aeef78af777af2fb630cc0bac1f03eb86beb diff --git a/src/rotations.f90 b/src/rotations.f90 index 465b84d39..561239e1f 100644 --- a/src/rotations.f90 +++ b/src/rotations.f90 @@ -1211,7 +1211,7 @@ subroutine unitTest msg = '' #if defined(__GFORTRAN__) && __GNUC__<9 - if(i>2 .and. i<7) cycle + if(i<7) cycle #endif if(i==1) then