Skip to content
Snippets Groups Projects
Commit 92bd0d55 authored by Stephan Schulz's avatar Stephan Schulz
Browse files

fix correct dummy argument sequence for set_proc_grid_params

parent 4ea05da4
No related branches found
No related tags found
1 merge request!8Refactor
Pipeline #26043 failed
...@@ -25,7 +25,7 @@ module ALL_module_obj ...@@ -25,7 +25,7 @@ module ALL_module_obj
real(c_double), value :: gamma real(c_double), value :: gamma
type(c_ptr) :: this type(c_ptr) :: this
end function end function
subroutine all_set_proc_grid_params_f(obj, loc, nloc, size, nsize) bind(C) subroutine all_set_proc_grid_params_f(obj, nloc, loc, nsize, size) bind(C)
use iso_c_binding use iso_c_binding
type(c_ptr), value :: obj type(c_ptr), value :: obj
integer(c_int), value :: nloc integer(c_int), value :: nloc
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment