diff --git a/CMakeLists.txt b/CMakeLists.txt
index 1f5de2742..a89dfd348 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -1304,9 +1304,6 @@ target_link_libraries (jt4code wsjt_fort wsjt_cxx)
 add_executable (msk144code lib/msk144code.f90 wsjtx.rc)
 target_link_libraries (msk144code wsjt_fort wsjt_cxx)
 
-add_executable (jt65 lib/jt65.f90 lib/jt65_test.f90 wsjtx.rc)
-target_link_libraries (jt65 wsjt_fort wsjt_cxx)
-
 add_executable (ft8code lib/ft8/ft8code.f90 wsjtx.rc)
 target_link_libraries (ft8code wsjt_fort wsjt_cxx)
 
diff --git a/lib/ft8/encode174_91_nocrc.f90 b/lib/ft8/encode174_91_nocrc.f90
index 371e83170..82d1669db 100644
--- a/lib/ft8/encode174_91_nocrc.f90
+++ b/lib/ft8/encode174_91_nocrc.f90
@@ -7,12 +7,10 @@ subroutine encode174_91_nocrc(message,codeword)
    use crc
 
    integer, parameter:: N=174, K=91, M=N-K
-   character*91 tmpchar
    integer*1 codeword(N)
    integer*1 gen(M,K)
    integer*1 message(K)
    integer*1 pchecks(M)
-   integer*1, target :: i1MsgBytes(12)
    include "ldpc_174_91_c_generator.f90"
    logical first
    data first/.true./
diff --git a/lib/ft8/osd174_91.f90 b/lib/ft8/osd174_91.f90
index d9584f56e..89677ebe8 100644
--- a/lib/ft8/osd174_91.f90
+++ b/lib/ft8/osd174_91.f90
@@ -167,7 +167,7 @@ subroutine osd174_91(llr,k,apmask,ndeep,message91,cw,nhardmin,dmin)
       nt=40
       ntheta=12
       ntau=15
-   elseif(ndeep.eq.6) then
+   else                     !ndeep=6
       nord=4
       npre1=1
       npre2=1
diff --git a/lib/jt49sim.f90 b/lib/jt49sim.f90
index e8aff69da..7c4c75051 100644
--- a/lib/jt49sim.f90
+++ b/lib/jt49sim.f90
@@ -61,6 +61,7 @@ program jt49sim
   nsym=0
   dnsps=0.
   baud=0.
+  sig=0.
 
   if(imode.eq.4) then
      nsym=206                           !Number of channel symbols (JT4)
diff --git a/lib/wsprd/wsprd_utils.c b/lib/wsprd/wsprd_utils.c
index 5a1d49741..64e809f8f 100644
--- a/lib/wsprd/wsprd_utils.c
+++ b/lib/wsprd/wsprd_utils.c
@@ -243,7 +243,7 @@ int floatcomp(const void* elem1, const void* elem2)
 int unpk_(signed char *message, char *hashtab, char *loctab, char *call_loc_pow, char *callsign)
 {
     int n1,n2,n3,ndbm,ihash,nadd,noprint=0;
-    char grid[5],grid6[7],cdbm[3];
+    char grid[5],grid6[7],cdbm[4];
     
     unpack50(message,&n1,&n2);
     if( !unpackcall(n1,callsign) ) return 1;