2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / gcc / testsuite / gcc.c-torture / execute / 20021015-1.c
blob9d357c0388fade229cfbd98d2dc09ef360dd7ada
1 /* PR opt/7409. */
3 extern void abort (void);
5 char g_list[] = { '1' };
7 void g (void *p, char *list, int length, char **elementPtr, char **nextPtr)
9 if (*nextPtr != g_list)
10 abort ();
12 **nextPtr = 0;
15 int main (void)
17 char *list = g_list;
18 char *element;
19 int i, length = 100;
21 for (i = 0; *list != 0; i++)
23 char *prevList = list;
24 g (0, list, length, &element, &list);
25 length -= (list - prevList);
28 return 0;