w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2026-08-14 07:23:39 -04:00
Code Issues Packages Projects Releases Wiki Activity

Remove a redundant file reference in CMakeLists.txt. Fix call to unpck77 in genft2.f90

Browse Source
This commit is contained in:
Joe Taylor
2019-01-25 14:46:17 -05:00
parent a0ddc1485e
commit 5efa28164c
2 changed files with 1 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
lib/ft2/genft2.f90
+1 -1
View File
@@ -68,7 +68,7 @@ subroutine genft2(msg0,ichk,msgsent,i4tone,itype)
i3=-1
n3=-1
call pack77(message,i3,n3,c77)
call unpack77(c77,msgsent,unpk77_success) !Unpack to get msgsent
call unpack77(c77,0,msgsent,unpk77_success) !Unpack to get msgsent
if(ichk.eq.1) go to 999
read(c77,"(77i1)") msgbits