Fixed length char component.

5 years ago · beeb123042
parent 99dc3f5d93
commit beeb123042
1 changed files with 1 additions and 1 deletions
--- a/base/modules/psb_timers_mod.f90
+++ b/base/modules/psb_timers_mod.f90
@ -56,7 +56,7 @@ module psb_timers_mod

  ! The data itself 
  type psb_string_item
-    character(len=40), allocatable :: data
+    character(len=40) :: data
  end type psb_string_item
  integer(psb_ipk_), allocatable  :: nsamples(:) 
  real(psb_dpk_), allocatable     :: timers(:,:)