Merge from mainline (gomp-merge-2005-02-26).
[official-gcc.git] / gcc / testsuite / gcc.c-torture / execute / builtins / lib / strstr.c
blob737a48f63dcdb935338b4fc816c49d2fb1ae9f41
1 extern int inside_main;
3 char *
4 strstr(const char *s1, const char *s2)
6 const char *p, *q;
8 #ifdef __OPTIMIZE__
9 if (inside_main)
10 abort ();
11 #endif
13 /* deliberately dumb algorithm */
14 for (; *s1; s1++)
16 p = s1, q = s2;
17 while (*q && *p)
19 if (*q != *p)
20 break;
21 p++, q++;
23 if (*q == 0)
24 return (char *)s1;
26 return 0;