Skip to content

Commit df69ed4

Browse files
committed
Fix bad C bind name for opencoarrays_co_reduce
- *Beleived* to be a bug on the 1.x branch, fixed here - Correct version appears to be on the master branch
1 parent 5be132f commit df69ed4

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/extensions/opencoarrays.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -220,7 +220,7 @@ subroutine opencoarrays_co_reduce(a, opr, opr_flags, result_image, stat, errmsg,
220220
#ifdef COMPILER_SUPPORTS_CAF_INTRINSICS
221221
bind(C,name="_caf_extensions_co_reduce")
222222
#else
223-
bind(C,name="_gfortran_extensions_co_reduce")
223+
bind(C,name="_gfortran_caf_co_reduce")
224224
#endif
225225
use iso_c_binding, only : c_ptr,c_funptr,c_int,c_char
226226
type(c_ptr), intent(in), value :: a

0 commit comments

Comments
 (0)