*******> update.11 Author: David Case Date: April 24, 2021 Programs: pmemd Description: Second small patch to support pmemd on Fedora with gfortran10 -------------------------------------------------------------------------------- src/pmemd/src/nfe_bbmd.F90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git src/pmemd/src/nfe_bbmd.F90 src/pmemd/src/nfe_bbmd.F90 index 820767dd00..c73fb01651 100644 --- src/pmemd/src/nfe_bbmd.F90 +++ src/pmemd/src/nfe_bbmd.F90 @@ -2370,7 +2370,7 @@ end subroutine ctxt_open_units #ifndef ASSUME_GFORTRAN data mult_a /z'6C078965'/ ! gfortran does not like this #else - mult_a = ieor(ishft(z'6C07', 16), z'8965') ! but this is okay + mult_a = ieor(ishft(int(z'6C07'), 16), z'8965') ! but this is okay #endif /* ASSUME_GFORTRAN */ self%mtinit = .true._wi @@ -2412,7 +2412,7 @@ end subroutine ctxt_open_units data mult_b /z'5D588B65'/ data msb1_d /z'80000000'/ #else - mult_b = ieor(ishft(z'5D58', 16), z'8B65') + mult_b = ieor(ishft(int(z'5D58'), 16), z'8B65') msb1_d = 1 msb1_d = ishft(msb1_d, 31) #endif /* ASSUME_GFORTRAN */