X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc%2Fparmread.F;h=8ffeeb09c3a384ab7b385ef3af9a9cf3c6e092c2;hb=22b8ccedb97b44c5e2f5a027fc5da9e57669d9fd;hp=b1a9a327ae19edf2331c4418154c3559c6a08dca;hpb=4c8df5bfd461b8509158a9d5e54f705a99c69fed;p=unres.git

diff --git a/source/cluster/wham/src/parmread.F b/source/cluster/wham/src/parmread.F
index b1a9a32..8ffeeb0 100644
--- a/source/cluster/wham/src/parmread.F
+++ b/source/cluster/wham/src/parmread.F
@@ -246,7 +246,11 @@ C
           enddo
         enddo
       enddo
+#ifdef AIX
+      call flush_(iout)
+#else
       call flush(iout)
+#endif
       endif
 #endif