mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2026-06-04 06:54:47 -04:00
Don't use "appendage" ~ or ! on decoded lines. Protect against bad read in genft8_174_91.
This commit is contained in:
@@ -16,8 +16,10 @@ subroutine genft8_174_91(msg,i3,n3,msgsent,msgbits,itone)
|
||||
call pack77(msg,i3,n3,c77)
|
||||
call unpack77(c77,msgsent)
|
||||
|
||||
read(c77,'(77i1)') msgbits
|
||||
call encode174_91(msgbits,codeword) !Encode the test message
|
||||
read(c77,'(77i1)',err=1) msgbits
|
||||
go to 2
|
||||
1 write(81,*) msg,c77 ; flush(81)
|
||||
2 call encode174_91(msgbits,codeword) !Encode the test message
|
||||
|
||||
! Message structure: S7 D29 S7 D29 S7
|
||||
itone(1:7)=icos7
|
||||
|
||||
Reference in New Issue
Block a user