Already fixed upstream.

Index: m4/aclocal_fc.f90
--- m4/aclocal_fc.f90.orig
+++ m4/aclocal_fc.f90
@@ -150,6 +150,7 @@ PROGRAM FC_AVAIL_KINDS
      WRITE(stdout,'(I0)') max_decimal_prec
      WRITE(stdout,'(I0)') num_ikinds
      WRITE(stdout,'(I0)') num_rkinds
+     CLOSE(stdout)
 END PROGRAM FC_AVAIL_KINDS
 !---- END ----- Determine the available KINDs for REALs and INTEGERs
 
