Skip to content

Commit 766c38e

Browse files
committed
feat(co_all): make impure elemental
1 parent 8362c93 commit 766c38e

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/sourcery/user_defined_collectives_m.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -12,7 +12,7 @@ module user_defined_collectives_m
1212

1313
interface
1414

15-
module subroutine co_all(boolean)
15+
impure elemental module subroutine co_all(boolean)
1616
!! If any image in a team calls this subroutine, then every image in the
1717
!! the same team must call this subroutine. This subroutine sets the
1818
!! "boolean" argument .true. if it is true in all participating images

0 commit comments

Comments
 (0)