Fix kernel/d_file_spmv size of strings for input file

5 years ago · 57ba8ad3e2
parent 4c7fa23c8a
commit 57ba8ad3e2
1 changed files with 2 additions and 1 deletions
--- a/test/kernel/d_file_spmv.f90
+++ b/test/kernel/d_file_spmv.f90
@ -35,7 +35,8 @@ program d_file_spmv
  implicit none

  ! input parameters
-  character(len=40) :: kmethd, ptype, mtrx_file, rhs_file
+  character(len=40) :: kmethd, ptype
+  character(len=512) :: mtrx_file, rhs_file

  ! sparse matrices
  type(psb_dspmat_type) :: a, aux_a