Skip to content

Commit 961d80e

Browse files
committed
Remove 'module'
1 parent 3a90b66 commit 961d80e

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/stdlib_array.fypp

+1-1
Original file line numberDiff line numberDiff line change
@@ -45,7 +45,7 @@ contains
4545
#:for k1, t1 in KINDS_TYPES
4646
#:for rank in RANKS
4747
!> Allocate an instance of the array within the wrapper.
48-
module subroutine allocate_array_${t1[0]}$${k1}$_${rank}$(wrapper, array, stat, msg)
48+
subroutine allocate_array_${t1[0]}$${k1}$_${rank}$(wrapper, array, stat, msg)
4949
class(t_array_wrapper), intent(out) :: wrapper
5050
${t1}$, intent(in) :: array${ranksuffix(rank)}$
5151
integer, intent(out) :: stat

0 commit comments

Comments
 (0)