Make decoder.f90 functional on Windows if exe_dir contains a space. (Temporary commit until we have a better solution).

This commit is contained in:
Uwe Risse 2024-05-12 08:35:21 +02:00
parent db51d7f61b
commit c8f72e5eec

View File

@ -153,7 +153,7 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
if(cmnd(i:i).eq.char(92)) cmnd(i:i)='/'
enddo
call execute_command_line(cmnd,exitstat=ierr)
if(ierr.ne.0) print*,trim(cmnd),' failed'
if(ierr.ne.0) call execute_command_line('.\sfrx '//'"'//trim(temp_dir)//'/fort.47"')
else
call timer('decft8 ',0)
newdat=params%newdat