We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 9c33417 commit c369336Copy full SHA for c369336
example_packages/cpp_files/src/cpp_files.f90
@@ -6,7 +6,7 @@ module cpp_files
6
public :: intvec_maxval
7
8
interface
9
- integer function intvec_maxval(array, n) bind(C, name = "intvec_maxval")
+ integer(c_int) function intvec_maxval(array, n) bind(C, name = "intvec_maxval")
10
import :: c_int, c_size_t
11
integer(c_int), intent(in) :: array(*)
12
integer(c_size_t), intent(in), value :: n
0 commit comments