Skip to content
Snippets Groups Projects
Commit ac644bf2 authored by Thomas Jahns's avatar Thomas Jahns :cartwheel:
Browse files

Fix missing target attribute.

parent e00e181d
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 2 additions and 2 deletions
src/xt_xmap_f.f90
+ 2
− 2
View file @ ac644bf2
......@@ -462,8 +462,8 @@ CONTAINS
IMPLICIT NONE
TYPE(xt_xmap), INTENT(in) :: xmap
INTEGER(i8), INTENT(in) :: num_repetitions
INTEGER, INTENT(in) :: src_displacements(num_repetitions)
INTEGER, INTENT(in) :: dst_displacements(num_repetitions)
INTEGER, TARGET, INTENT(in) :: src_displacements(num_repetitions)
INTEGER, TARGET, INTENT(in) :: dst_displacements(num_repetitions)
INTEGER(c_int) :: num_repetitions_c
TYPE(xt_xmap) :: xmap_spread
INTEGER(c_int), TARGET, ALLOCATABLE :: &
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Imprint | Privacy Policy