w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-05-23 18:02:29 -04:00
Code Issues Packages Projects Releases Wiki Activity

Fix a potential array bounds issue in osd174.f90.

Browse Source 
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@8040 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Steven Franke 2017-08-28 21:09:44 +00:00
parent fb3f07cd4c
commit 89e3e989ca
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/fsk4hf/osd174.f90
View File

@ -200,7 +200,7 @@ if(npre2.eq.1) then
do i1=K,1,-1 do i1=K,1,-1
do i2=i1-1,1,-1 do i2=i1-1,1,-1
ntotal=ntotal+1 ntotal=ntotal+1
mi=ieor(g2(K+1:K+ntau,i1),g2(K+1:K+ntau,i2)) mi(1:ntau)=ieor(g2(K+1:K+ntau,i1),g2(K+1:K+ntau,i2))
call boxit(reset,mi(1:ntau),ntau,ntotal,i1,i2) call boxit(reset,mi(1:ntau),ntau,ntotal,i1,i2)
enddo enddo
enddo enddo