Add allocatable attribute

fortran-lang · Jul 30, 2024 · 9670d7c · 9670d7c
1 parent b435ce0
commit 9670d7c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/stdlib_array.fypp b/src/stdlib_array.fypp
@@ -47,7 +47,7 @@ contains
             !> Allocate an instance of the array within the wrapper.
             subroutine allocate_array_${t1[0]}$${k1}$_${rank}$(wrapper, array, stat, msg)
                 class(t_array_wrapper), intent(out) :: wrapper
-                ${t1}$, intent(in) :: array${ranksuffix(rank)}$
+                ${t1}$, allocatable, intent(in) :: array${ranksuffix(rank)}$
                 integer, intent(out) :: stat
                 character(len=:), allocatable, intent(out) :: msg