mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-05-24 02:12:37 -04: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
7c2d9cf5df
commit
eda7d9e3cc
@ -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…
x
Reference in New Issue
Block a user