Skip to content

Commit 48cb6f0

Browse files
authored
PGI workaround for use iso_c_binding (#38)
Fixes #37.
1 parent 374f147 commit 48cb6f0

File tree

6 files changed

+6
-0
lines changed

6 files changed

+6
-0
lines changed

src/cpp_bindgen/generator.cpp

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -154,6 +154,7 @@ namespace cpp_bindgen {
154154
void generate_fortran_interface(std::ostream &strm, std::string const &module_name) {
155155
strm << "! This file is generated!\n";
156156
strm << "module " << module_name << "\n";
157+
strm << "use iso_c_binding\n"; // pgi wants to have this
157158
strm << "implicit none\n";
158159
strm << " interface\n\n";
159160
strm << _impl::get_entities<_impl::fortran_bindings_traits>();

tests/regression/array/bindgen_regression_array.f90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,6 @@
11
! This file is generated!
22
module bindgen_regression_array
3+
use iso_c_binding
34
implicit none
45
interface
56

tests/regression/array_gt_legacy/bindgen_regression_array_gt_legacy.f90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,6 @@
11
! This file is generated!
22
module bindgen_regression_array_gt_legacy
3+
use iso_c_binding
34
implicit none
45
interface
56

tests/regression/simple/bindgen_regression_simple.f90

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,6 @@
11
! This file is generated!
22
module bindgen_regression_simple
3+
use iso_c_binding
34
implicit none
45
interface
56

tests/unit_tests/test_export.cpp

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -120,6 +120,7 @@ void test_cpp_bindgen_and_wrapper_compatible_type_b(bindgen_fortran_array_descri
120120

121121
const char expected_fortran_interface[] = R"?(! This file is generated!
122122
module my_module
123+
use iso_c_binding
123124
implicit none
124125
interface
125126

tests/unit_tests/test_generator.cpp

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -54,6 +54,7 @@ void qux(int, bindgen_fortran_array_descriptor*);
5454

5555
const char expected_fortran_interface[] = R"?(! This file is generated!
5656
module my_module
57+
use iso_c_binding
5758
implicit none
5859
interface
5960

0 commit comments

Comments
 (0)