From 364db768dbdd7306c408d94e450f8a6e87d6cfeb Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Fri, 14 Feb 2020 11:49:07 -0500
Subject: [PATCH] Send "<DecodeFinished>" for FT8 only after the full-length
 decoding pass.

---
 lib/decoder.f90 | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/lib/decoder.f90 b/lib/decoder.f90
index 3f58f8b3e..6e60c0fd3 100644
--- a/lib/decoder.f90
+++ b/lib/decoder.f90
@@ -276,8 +276,16 @@ subroutine multimode_decoder(ss,id2,params,nfsample)
 ! JT65 is not yet producing info for nsynced, ndecoded.
 800 ndecoded = my_jt4%decoded + my_jt65%decoded + my_jt9%decoded +       &
          my_ft8%decoded + my_ft4%decoded
-  write(*,1010) nsynced,ndecoded
+  if(params%nmode.eq.8) then
+     if(params%nzhsym.lt.50) ndecoded_pass1=ndecoded
+     if(params%nzhsym.ge.50) then
+        ndecoded=ndecoded+ndecoded_pass1
+        write(*,1010) nsynced,ndecoded
+     endif
+  else
+     write(*,1010) nsynced,ndecoded
 1010 format('<DecodeFinished>',2i4)
+  endif
   call flush(6)
   close(13)
   if(ncontest.eq.6) close(19)