fixed bug that (sometimes, always?) prevented reading in of debug.config, when variable 'line' was still '#EOF#' from former IO_read...

This commit is contained in:
Philip Eisenlohr 2013-10-23 11:23:41 +00:00
parent bdafc6f1b8
commit eb0d2b7e24
1 changed files with 2 additions and 2 deletions

View File

@ -175,7 +175,7 @@ subroutine debug_init
!--------------------------------------------------------------------------------------------------
! try to open the config file
line = ''
fileExists: if(IO_open_file_stat(fileunit,debug_configFile)) then
do while (trim(line) /= '#EOF#') ! read thru sections of phase part
line = IO_read(fileunit)