mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-04 16:31:17 -05:00
Guard against sending too-short data records to detectmsk routines.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7027 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
573615c565
commit
21095808f1
@ -16,6 +16,7 @@ subroutine msk144_decode(id2,npts,nutc,nprint,pchk_file,mycall,hiscall, &
|
|||||||
|
|
||||||
line(1:100)(1:1)=char(0)
|
line(1:100)(1:1)=char(0)
|
||||||
if(maxval(id2(1:npts)).eq.0 .and. minval(id2(1:npts)).eq.0) go to 900
|
if(maxval(id2(1:npts)).eq.0 .and. minval(id2(1:npts)).eq.0) go to 900
|
||||||
|
if( npts .lt. 0.25*12000 ) go to 900 !Min record length 0.25s.
|
||||||
|
|
||||||
hist=0
|
hist=0
|
||||||
do i=0,npts-1
|
do i=0,npts-1
|
||||||
|
Loading…
Reference in New Issue
Block a user