mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-25 05:38:46 -05:00
1. Fixed issue with jt9 process not sleeping under Linux.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@3103 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
1c9b8f7c35
commit
b5e4cfe3ba
@ -51,8 +51,7 @@ subroutine jt9a
|
||||
|
||||
100 inquire(file=trim(cwd)//'/.lock',exist=fileExists)
|
||||
if(fileExists) go to 10
|
||||
!call sleep_msec(100)
|
||||
call usleep(100*1000)
|
||||
call sleep_msec(100)
|
||||
go to 100
|
||||
|
||||
999 return
|
||||
|
@ -1,3 +1,4 @@
|
||||
subroutine sleep_msec(n)
|
||||
call usleep(n*1000)
|
||||
return
|
||||
end subroutine sleep_msec
|
||||
|
Loading…
Reference in New Issue
Block a user