Commit 24ef129e authored by Thomas Jahns's avatar Thomas Jahns 🤸
Browse files

Add missing restrict declarations.

parent a2f489c3
......@@ -109,7 +109,7 @@ void gawl(double *pfn, double *pl, double *pw, int kn)
}
static
void gauaw(int kn, double *pl, double *pw)
void gauaw(int kn, double *restrict pl, double *restrict pw)
{
/*
* 1.0 Initialize Fourier coefficients for ordinary Legendre polynomials
......@@ -291,7 +291,7 @@ void gauaw_old(double *pa, double *pw, int nlat)
}
#endif
void gaussaw(double *pa, double *pw, int nlat)
void gaussaw(double *restrict pa, double *restrict pw, int nlat)
{
//gauaw_old(pa, pw, nlat);
gauaw(nlat, pa, pw);
......
#ifndef _GAUSSGRID_H
#define _GAUSSGRID_H
void gaussaw(double *pa, double *pw, int nlat);
void gaussaw(double *restrict pa, double *restrict pw, int nlat);
#endif /* _GAUSSGRID_H */
/*
......
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