gcc-4.9/gcc/testsuite/gfortran.dg/c_size_t_driver.c


1
2
3
4
5
6
7
8
9
10
11
12

#include <stdlib.h>
void sub0(int my_c_size);

int main(int argc, char **argv)
{
  int my_c_size;

  my_c_size = (int)sizeof(size_t);
  sub0(my_c_size);

  return 0;
}