diff --git a/lib/decoder.f90 b/lib/decoder.f90 index 59fbc82e5..947420724 100644 --- a/lib/decoder.f90 +++ b/lib/decoder.f90 @@ -147,8 +147,9 @@ subroutine multimode_decoder(ss,id2,params,nfsample) access='stream') write(47) params%yymmdd,params%nutc,id2(1:20),id2(1:180000) close(47) - cmnd=trim(exe_dir)//'/sfrx '//trim(temp_dir)//'/fort.47' - call execute_command_line(cmnd) + cmnd='"'//trim(exe_dir)//'/sfrx" "'//trim(temp_dir)//'/fort.47"' + call execute_command_line(cmnd,exitstat=ierr) + if(ierr.ne.0) print*,trim(cmnd),' failed' else call timer('decft8 ',0) newdat=params%newdat