tests/inputs/testparametric.c

   1 int Read_SourceX();
   2 int Read_SourceY();
   3 void f(int, int, int *, int *);
   4 void WriteX(int);
   5 void WriteY(int);
   6
   7 int M;
   8 #pragma parameter M 10 20
   9 int N;
  10 #pragma parameter N 1000 10000
  11
  12 int main() {
  13     int x[1], y[1];
  14
  15     for (int k = 0; k < N; ++k)
  16         x[k] = Read_SourceX();
  17     for (int k = 0; k < M; ++k)
  18         y[k] = Read_SourceY();
  19     for (int j = 0; j < N; ++j)
  20         for (int i = 0; i < M; ++i)
  21             f(x[j], y[i], &x[j], &y[i]);
  22     for (int k = 0; k < N; ++k)
  23         WriteX(x[k]);
  24     for (int k = 0; k < M; ++k)
  25         WriteY(y[k]);
  26 }