URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [980701-1.c] - Blame information for rev 774

Go to most recent revision | Details | Compare with Previous | View Log


ns_name_skip (unsigned char **x, unsigned char *y)
{
  *x = 0;
  return 0;
}
 
unsigned char a[2];
 
int dn_skipname(unsigned char *ptr, unsigned char *eom) {
    unsigned char *saveptr = ptr;
 
    if (ns_name_skip(&ptr, eom) == -1)
                return (-1);
    return (ptr - saveptr);
}
 
main()
{
  if (dn_skipname (&a[0], &a[1]) == 0)
    abort ();
  exit (0);
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`ns_name_skip (unsigned char *x, unsigned char y)`
2			`{`
3			`*x = 0;`
4			`return 0;`
5			`}`
6
7			`unsigned char a[2];`
8
9			`int dn_skipname(unsigned char ptr, unsigned char eom) {`
10			`unsigned char *saveptr = ptr;`
11
12			`if (ns_name_skip(&ptr, eom) == -1)`
13			`return (-1);`
14			`return (ptr - saveptr);`
15			`}`
16
17			`main()`
18			`{`
19			`if (dn_skipname (&a[0], &a[1]) == 0)`
20			`abort ();`
21			`exit (0);`
22			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [980701-1.c] - Blame information for rev 774