Warning message should go to stdout, not to unit 0

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@7492 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2011-02-13 14:23:41 +00:00
parent 807820049d
commit e694bbdd4e
2 changed files with 1 additions and 3 deletions

View File

@ -477,7 +477,7 @@ FUNCTION get_clock( label )
!
get_clock = notrunning
!
WRITE( 0, '("get_clock: no clock for ",A12," found !")') label
WRITE( stdout, '("get_clock: no clock for ",A12," found !")') label
!
RETURN
!

View File

@ -52,7 +52,6 @@ error_handler.o : parallel_include.o
fft_base.o : fft_types.o
fft_base.o : kind.o
fft_base.o : mp.o
fft_base.o : mp_global.o
fft_base.o : parallel_include.o
fft_interfaces.o : fft_base.o
fft_interfaces.o : fft_parallel.o
@ -63,7 +62,6 @@ fft_parallel.o : fft_base.o
fft_parallel.o : fft_scalar.o
fft_parallel.o : fft_types.o
fft_parallel.o : kind.o
fft_parallel.o : mp_global.o
fft_parallel.o : parallel_include.o
fft_scalar.o : kind.o
fft_types.o : io_global.o