diff --git a/lib/ft2/ft2_decode.f90 b/lib/ft2/ft2_decode.f90 index 96f728354..e26fc5567 100644 --- a/lib/ft2/ft2_decode.f90 +++ b/lib/ft2/ft2_decode.f90 @@ -180,7 +180,7 @@ subroutine ft2_decode(cdatetime,nfqso,iwave,ndecodes,mycall,hiscall,nrx) if(sum(message77).eq.0) cycle if( nharderror.ge.0 ) then write(c77,'(77i1)') message77(1:77) - call unpack77(c77,message,unpk77_success) + call unpack77(c77,nrx,message,unpk77_success) idupe=0 do i=1,ndecodes if(decodes(i).eq.message) idupe=1 diff --git a/lib/ft2/libwsjt_cxx.a b/lib/ft2/libwsjt_cxx.a index c7dde28c8..d10d509cf 100644 Binary files a/lib/ft2/libwsjt_cxx.a and b/lib/ft2/libwsjt_cxx.a differ diff --git a/lib/ft2/libwsjt_fort.a b/lib/ft2/libwsjt_fort.a index 84c1c6f09..53b9c2878 100644 Binary files a/lib/ft2/libwsjt_fort.a and b/lib/ft2/libwsjt_fort.a differ