8sa1-gcc/gcc/testsuite/gcc.c-torture/execute/961125-1.c
Jeff Law 921e5a0eb4 Initial revision
From-SVN: r14840
1997-08-19 01:34:40 -06:00

34 lines
445 B
C

static char *
begfield (int tab, char *ptr, char *lim, int sword, int schar)
{
if (tab)
{
while (ptr < lim && sword--)
{
while (ptr < lim && *ptr != tab)
++ptr;
if (ptr < lim)
++ptr;
}
}
else
{
while (1)
;
}
if (ptr + schar <= lim)
ptr += schar;
return ptr;
}
main ()
{
char *s = ":ab";
char *lim = s + 3;
if (begfield (':', s, lim, 1, 1) != s + 2)
abort ();
exit (0);
}