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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20000314-3.c] - Blame information for rev 801

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


extern void abort (void);
 
static char arg0[] = "arg0";
static char arg1[] = "arg1";
 
static void attr_rtx            (char *, char *);
static char *attr_string        (char *);
static void attr_eq             (char *, char *);
 
static void
attr_rtx (char *varg0, char *varg1)
{
  if (varg0 != arg0)
    abort ();
 
  if (varg1 != arg1)
    abort ();
 
  return;
}
 
static void
attr_eq (name, value)
     char *name, *value;
{
  return attr_rtx (attr_string (name),
                   attr_string (value));
}
 
static char *
attr_string (str)
     char *str;
{
  return str;
}
 
int main()
{
  attr_eq (arg0, arg1);
  exit (0);
}
 

Line No.	Rev	Author	Line
1	688	jeremybenn	`extern void abort (void);`
2
3			`static char arg0[] = "arg0";`
4			`static char arg1[] = "arg1";`
5
6			`static void attr_rtx (char , char );`
7			`static char attr_string (char );`
8			`static void attr_eq (char , char );`
9
10			`static void`
11			`attr_rtx (char varg0, char varg1)`
12			`{`
13			`if (varg0 != arg0)`
14			`abort ();`
15
16			`if (varg1 != arg1)`
17			`abort ();`
18
19			`return;`
20			`}`
21
22			`static void`
23			`attr_eq (name, value)`
24			`char name, value;`
25			`{`
26			`return attr_rtx (attr_string (name),`
27			`attr_string (value));`
28			`}`
29
30			`static char *`
31			`attr_string (str)`
32			`char *str;`
33			`{`
34			`return str;`
35			`}`
36
37			`int main()`
38			`{`
39			`attr_eq (arg0, arg1);`
40			`exit (0);`
41			`}`
42

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20000314-3.c] - Blame information for rev 801