diff --git a/lib/ft8_decode.f90 b/lib/ft8_decode.f90
index 4bd637e95..a19d0b83c 100644
--- a/lib/ft8_decode.f90
+++ b/lib/ft8_decode.f90
@@ -59,7 +59,7 @@ contains
     integer*2 iwave(15*12000)
     integer apsym2(58),aph10(10)
     character datetime*13,msg37*37
-    character*37 allmessages(100)
+    character*37 allmessages(200)
     character*12 ctime
     integer allsnrs(100)
     integer itone(NN)