mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-05-23 09:59:31 -04:00
Increase width of "result" from 60 to 64, to accommodate longest messages.
This commit is contained in:
parent
3a5da4b2ac
commit
b3d8750949
@ -93,7 +93,7 @@ extern struct {
|
||||
int nQDecoderDone; //1 for real-time decodes, 2 for data from disk
|
||||
int nWDecoderBusy; //Set to 1 when WSJT-X decoder is busy
|
||||
int nWTransmitting; //Set to TRperiod when WSJT-X is transmitting
|
||||
char result[50][60]; //Staging area for QMAP decodes
|
||||
char result[50][64]; //Staging area for QMAP decodes
|
||||
} decodes_;
|
||||
|
||||
extern struct {
|
||||
|
@ -10,7 +10,7 @@ subroutine decode0(dd,ss,savg)
|
||||
logical*1 bAlso30
|
||||
character mycall*12,hiscall*12,mygrid*6,hisgrid*6,datetime*20
|
||||
character mycall0*12,hiscall0*12,hisgrid0*6
|
||||
character*60 result
|
||||
character*64 result
|
||||
common/decodes/ndecodes,ncand,nQDecoderDone,nWDecoderBusy, &
|
||||
nWTransmitting,result(50)
|
||||
common/npar/fcenter,nutc,fselected,mousedf,mousefqso,nagain, &
|
||||
|
@ -26,7 +26,7 @@ subroutine q65b(nutc,nqd,fcenter,nfcal,nfsample,ikhz,mousedf,ntol, &
|
||||
character*6 hisgrid
|
||||
character*4 grid4
|
||||
character*3 csubmode
|
||||
character*60 result,ctmp
|
||||
character*64 result,ctmp
|
||||
character*20 datetime,datetime1
|
||||
common/decodes/ndecodes,ncand,nQDecoderDone,nWDecoderBusy, &
|
||||
nWTransmitting,result(50)
|
||||
@ -118,7 +118,6 @@ subroutine q65b(nutc,nqd,fcenter,nfcal,nfsample,ikhz,mousedf,ntol, &
|
||||
|
||||
do i=1,ndecodes !Check for dupes
|
||||
i1=index(result(i)(42:),trim(msg0))
|
||||
if(bClickDecode) print*,'C',i,i1,result(i)(42:),trim(msg0)
|
||||
! If this is a dupe, don't save it again:
|
||||
if(i1.gt.0 .and. (.not.bClickDecode .or. nhsym.eq.390)) go to 800
|
||||
enddo
|
||||
|
@ -20,7 +20,7 @@ subroutine q65c
|
||||
character*12 mycall,hiscall
|
||||
character*6 mygrid,hisgrid
|
||||
character*20 datetime
|
||||
character*60 result
|
||||
character*64 result
|
||||
common/decodes/ndecodes,ncand,nQDecoderDone,nWDecoderBusy, &
|
||||
nWTransmitting,result(50)
|
||||
common/datcom2/dd(2,5760000),ss(400,NFFT),savg(NFFT),nparams0
|
||||
|
@ -27,7 +27,7 @@ subroutine qmapa(dd,ss,savg,newdat,nutc,fcenter,ntol,nfa,nfb, &
|
||||
logical*1 bAlso30,bClickDecode
|
||||
character mycall*12,hiscall*12,hisgrid*6
|
||||
type(candidate) :: cand(MAX_CANDIDATES)
|
||||
character*60 result
|
||||
character*64 result
|
||||
character*20 datetime
|
||||
common/decodes/ndecodes,ncand,nQDecoderDone,nWDecoderBusy, &
|
||||
nWTransmitting,result(50)
|
||||
|
@ -225,7 +225,7 @@ struct {
|
||||
int nQDecoderDone; //QMAP decoder is finished (0 or 1)
|
||||
int nWDecoderBusy; //WSJT-X decoder is busy (0 or 1)
|
||||
int nWTransmitting; //WSJT-X is transmitting (0 or 1)
|
||||
char result[50][60]; //Decodes as character*60 arrays
|
||||
char result[50][64]; //Decodes as character*64 arrays
|
||||
} qmapcom;
|
||||
int* ipc_qmap;
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user