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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [treelang/] [execute/] [static.tree] - Blame information for rev 867

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


// { dg-do run }
external_reference void abort ();
external_reference void exit (int code);
external_definition int main (int argc, int argv);
 
static int foo ();
 
foo
{
        static int bar = +1;
 
        bar = bar + +1;
        return bar;
}
 
main
{
  automatic int aaa = +3;
 
  aaa = foo ();
  aaa = foo ();
 
  if (aaa == 3)
    {
      exit (0);
    }
  else
    {
      abort ();
    }
  return 0;
}

Line No.	Rev	Author	Line
1	149	jeremybenn	`// { dg-do run }`
2			`external_reference void abort ();`
3			`external_reference void exit (int code);`
4			`external_definition int main (int argc, int argv);`
5
6			`static int foo ();`
7
8			`foo`
9			`{`
10			`static int bar = +1;`
11
12			`bar = bar + +1;`
13			`return bar;`
14			`}`
15
16			`main`
17			`{`
18			`automatic int aaa = +3;`
19
20			`aaa = foo ();`
21			`aaa = foo ();`
22
23			`if (aaa == 3)`
24			`{`
25			`exit (0);`
26			`}`
27			`else`
28			`{`
29			`abort ();`
30			`}`
31			`return 0;`
32			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [treelang/] [execute/] [static.tree] - Blame information for rev 867