mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-17 17:42:02 -05:00
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@1756 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
4f6e3d73e2
commit
fcdfe2ac58
@ -2,7 +2,7 @@ subroutine cs_init
|
|||||||
character*12 csub0
|
character*12 csub0
|
||||||
integer*8 mtx
|
integer*8 mtx
|
||||||
common/mtxcom/mtx,ltrace,mtxstate,csub0
|
common/mtxcom/mtx,ltrace,mtxstate,csub0
|
||||||
ltrace=3
|
ltrace=0
|
||||||
mtxstate=0
|
mtxstate=0
|
||||||
csub0='**unlocked**'
|
csub0='**unlocked**'
|
||||||
call fthread_mutex_init(mtx)
|
call fthread_mutex_init(mtx)
|
||||||
|
Loading…
Reference in New Issue
Block a user