diff --git a/libm65/decode0.f90 b/libm65/decode0.f90
index 81f82ef42..01df138de 100644
--- a/libm65/decode0.f90
+++ b/libm65/decode0.f90
@@ -58,7 +58,6 @@ subroutine decode0(dd,ss,savg,nstandalone)
 
   call timer('map65a  ',1)
   call timer('decode0 ',1)
-  if(nstandalone.eq.0) call timer('decode0 ',101)
 
   write(*,1010) nsum,nsave
 1010 format('<DecodeFinished>',2i4)
diff --git a/libm65/m65a.F90 b/libm65/m65a.F90
index a24b8676d..21ea4019d 100644
--- a/libm65/m65a.F90
+++ b/libm65/m65a.F90
@@ -27,6 +27,7 @@ subroutine m65a
 
   inquire(file=trim(cwd)//'/.quit',exist=fileExists)
   if(fileExists) then
+     call timer('decode0 ',101)
      call ftnquit
      i=detach_m65()
      go to 999
diff --git a/libm65/timer.f90 b/libm65/timer.f90
index 421ca9e81..4695d3a47 100644
--- a/libm65/timer.f90
+++ b/libm65/timer.f90
@@ -64,7 +64,7 @@ subroutine timer(dname,k)
 
 40 write(lu,1040)
 1040 format(/'     name                 time  frac     dtime',       &
-             ' dfrac  calls level parent'/73('-'))
+             ' dfrac  calls level parent'/75('-'))
 
   if(k.gt.100) then
      ndiv=k-100
@@ -96,7 +96,7 @@ subroutine timer(dname,k)
   enddo
 
   write(lu,1070) sum,sumf
-1070 format(/36x,f10.2,f6.2)
+1070 format(75('-')/36x,f10.2,f6.2)
   nmax=0
   eps=0.000001
   ntrace=0