Commit 2c3f18da authored by Thomas Jahns's avatar Thomas Jahns 🤸
Browse files

Partially revert previous change.

* This way CDI can still be built with pgcc 11.x.
parent 926115a5
......@@ -785,7 +785,7 @@ void gridDefYbounds(int gridID, const double *ybounds_vec);
/* gridInqYbounds: Get the bounds of a Y-axis */
int gridInqYbounds(int gridID, double *ybounds_vec);
void gridDefRowlon(int gridID, int nrowlon, const int rowlon_vec[nrowlon]);
void gridDefRowlon(int gridID, int nrowlon, const int rowlon_vec[]);
void gridInqRowlon(int gridID, int *rowlon_vec);
void gridChangeType(int gridID, int gridtype);
......
......@@ -1266,7 +1266,7 @@ int gridInqNP(int gridID)
@EndFunction
*/
void gridDefRowlon(int gridID, int nrowlon, const int rowlon[nrowlon])
void gridDefRowlon(int gridID, int nrowlon, const int rowlon[])
{
grid_t *gridptr = ( grid_t *) reshGetVal ( gridID, &gridOps );
......
......@@ -2116,7 +2116,7 @@ module mo_cdi
import :: c_int
integer(kind=c_int), value :: gridID
integer(kind=c_int), value :: nrowlon
integer(kind=c_int), intent(in),dimension(nrowlon) :: rowlon_vec
integer(kind=c_int), intent(in),dimension(*) :: rowlon_vec
end subroutine gridDefRowlon
end interface
interface
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment