diff --git a/src/templates_front/templator_front.org b/src/templates_front/templator_front.org index 47ebcd9..ac8ede4 100644 --- a/src/templates_front/templator_front.org +++ b/src/templates_front/templator_front.org @@ -3348,7 +3348,7 @@ end interface character, allocatable :: str_compiled(:) integer(8) :: $group_dset_dim$ - integer(4) :: rc + integer :: rc rc = trexio_read_$group_dset_dim$_64(trex_file, $group_dset_dim$) if (rc /= TREXIO_SUCCESS) trexio_read_$group_dset$ = rc @@ -3369,7 +3369,7 @@ end interface #+end_src #+begin_src f90 :tangle helper_write_dset_str_front_fortran.fh_90 - integer(4) function trexio_write_$group_dset$ (trex_file, dset, max_str_len) + integer function trexio_write_$group_dset$ (trex_file, dset, max_str_len) implicit none integer(8), intent(in), value :: trex_file integer(4), intent(in), value :: max_str_len