diff options
Diffstat (limited to 'm4')
-rw-r--r-- | m4/aclocal_fc.m4 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/m4/aclocal_fc.m4 b/m4/aclocal_fc.m4 index 65bb817..c8db176 100644 --- a/m4/aclocal_fc.m4 +++ b/m4/aclocal_fc.m4 @@ -308,8 +308,8 @@ AC_RUN_IFELSE([ ENDIF IF (k .LE. 0) EXIT ENDDO - IF (k.NE.lastkind) WRITE(8,'(I0,A)',ADVANCE='NO') k, " " - dnl WRITE(8,'(I0,A)',ADVANCE='NO') lastkind, " " + dnl IF (k.NE.lastkind) WRITE(8,'(I0,A)',ADVANCE='NO') k, " " + IF (lastkind.NE.-1) WRITE(8,'(I0,A)',ADVANCE='NO') lastkind, " " WRITE(8,'(/)') WRITE(8,'("rk:")',ADVANCE='NO') ! Find real KINDs lastkind=SELECTED_REAL_KIND(1) |