gnu/dist/gcc4/gcc/testsuite/gcc.c-torture/execute/builtins/lib/strlen.c

   1 extern void abort (void);
   2 extern int inside_main;
   3
   4 __SIZE_TYPE__
   5 strlen (const char *s)
   6 {
   7   __SIZE_TYPE__ i;
   8
   9 #ifdef __OPTIMIZE__
  10   if (inside_main)
  11     abort ();
  12 #endif
  13
  14   i = 0;
  15   while (s[i] != 0)
  16     i++;
  17
  18   return i;
  19 }