From a5fd10621bdb6e3bdd5c3f73501d29a1bb8fc6e7 Mon Sep 17 00:00:00 2001 From: Richard Shaw Date: Mar 31 2020 19:04:30 +0000 Subject: Update gcc10 patch. --- diff --git a/js8call-gcc-10.patch b/js8call-gcc-10.patch index 2e3fd07..b4cc039 100644 --- a/js8call-gcc-10.patch +++ b/js8call-gcc-10.patch @@ -33,3 +33,16 @@ Index: js8call-2.1.1/lib/ft8/foxfilt.f90 df=48000.0/NFFT fa=nfreq - 0.5*6.25 fb=nfreq + 7.5*6.25 + (nslots-1)*(width+OFFSET) +Index: js8call-2.1.1/lib/lpf1.f90 +=================================================================== +--- js8call-2.1.1.orig/lib/lpf1.f90 ++++ js8call-2.1.1/lib/lpf1.f90 +@@ -11,7 +11,7 @@ subroutine lpf1(dd,jz,dat,jz2) + fac=1.0/float(NFFT1) + x(1:jz)=fac*dd(1:jz) + x(jz+1:NFFT1)=0.0 +- call four2a(x,NFFT1,1,-1,0) !Forwarxd FFT, r2c ++ call four2a(cx,NFFT1,1,-1,0) !Forwarxd FFT, r2c + cx(NFFT2/2:)=0.0 + + ! df=11025.0/NFFT1