Skip to content

Commit c369336

Browse files
committed
make cpp interface interoperable
1 parent 9c33417 commit c369336

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

example_packages/cpp_files/src/cpp_files.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,7 +6,7 @@ module cpp_files
66
public :: intvec_maxval
77

88
interface
9-
integer function intvec_maxval(array, n) bind(C, name = "intvec_maxval")
9+
integer(c_int) function intvec_maxval(array, n) bind(C, name = "intvec_maxval")
1010
import :: c_int, c_size_t
1111
integer(c_int), intent(in) :: array(*)
1212
integer(c_size_t), intent(in), value :: n

0 commit comments

Comments
 (0)