Output of non-writing processes should not be redirected to /dev/null: it is

useless (the call to "environment_set" already does that) and breaks Windows


git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@12357 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2016-04-25 18:40:02 +00:00
parent 9f75263c56
commit ff7471ead0
3 changed files with 0 additions and 8 deletions

View File

@ -81,8 +81,6 @@
write(name_proc,'(5i1)') &
& (mpime+1)/10000,mod(mpime+1,10000)/1000,mod(mpime+1,1000)/100,mod(mpime+1,100)/10,mod(mpime+1,10)
OPEN( UNIT = stdout, FILE = trim(tmp_dir)//trim(prefix)//'-out_'//name_proc, STATUS = 'UNKNOWN' )
else
if(.not.ionode) OPEN ( unit = stdout, file='/dev/null', status='unknown' )
endif
#endif

View File

@ -19,9 +19,6 @@ SUBROUTINE print_clock_pwcond()
IMPLICIT NONE
!
!
IF ( mpime /= root ) &
OPEN( UNIT = stdout, FILE = '/dev/null', STATUS = 'UNKNOWN' )
!
WRITE( stdout, * )
!
CALL print_clock( 'PWCOND' )

View File

@ -24,9 +24,6 @@ SUBROUTINE print_clock_lr()
!
IMPLICIT NONE
!
IF ( mpime /= root ) &
OPEN( UNIT = stdout, FILE = '/dev/null', STATUS = 'UNKNOWN' )
!
WRITE( stdout, * )
!
IF (eels) THEN