diff --git a/lib/decjt9.f90 b/lib/decjt9.f90
index ffed56d52..bc413e462 100644
--- a/lib/decjt9.f90
+++ b/lib/decjt9.f90
@@ -115,6 +115,7 @@ subroutine decjt9(ss,id2,nutc,nfqso,newdat,npts8,nfa,nfsplit,nfb,ntol,  &
               write(*,1000) nutc,nsnr,xdt,nint(freq),msg
               write(13,1002) nutc,nsync,nsnr,xdt,freq,ndrift,msg
               call flush(6)
+              call flush(13)
               !$omp end critical(decode_results)
 
 1000          format(i4.4,i4,f5.1,i5,1x,'@',1x,a22)
diff --git a/lib/decoder.f90 b/lib/decoder.f90
index b34aa4431..966d94e87 100644
--- a/lib/decoder.f90
+++ b/lib/decoder.f90
@@ -43,7 +43,7 @@ subroutine decoder(ss,id2)
   newdat9=newdat
 
   !$ call omp_set_dynamic(.true.)
-  !$omp parallel sections num_threads(2) copyin(/tracer_priv/) shared(ndecoded)
+  !$omp parallel sections num_threads(2) copyin(/tracer_priv/) shared(ndecoded) if(.true.) !iif() needed on Mac
 
   !$omp section
   if(nmode.eq.65 .or. (nmode.gt.65 .and. ntxmode.eq.65)) then
diff --git a/lib/jt65a.f90 b/lib/jt65a.f90
index 3f57d77a6..3265fe8da 100644
--- a/lib/jt65a.f90
+++ b/lib/jt65a.f90
@@ -87,6 +87,7 @@ subroutine jt65a(dd0,npts,newdat,nutc,nf1,nf2,nfqso,ntol,nagain,ndecoded)
                 decoded,nbmkv
 1012       format(i4.4,i4,i5,f6.1,f8.0,i4,3x,a22,' JT65',i4)
            call flush(6)
+           call flush(13)
            !$omp end critical(decode_results)
 
            freq0=freq+a(1)