gcc/testsuite/gfortran.dg/lto/20091028-1_1.c

   1 extern void bcopy(const void *, void *, __SIZE_TYPE__ n);
   2 char *p;
   3 int int_gen_ti_header_c_ (char * hdrbuf, int * hdrbufsize,
   4                           int * itypesize, int * typesize,
   5                           int * DataHandle, char * Data,
   6                           int * Count, int * code)
   7 {
   8   bcopy (typesize, p, sizeof(int)) ;
   9   bcopy (Data, p, *Count * *typesize) ;
  10 }
  11