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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gnat.dg/] [stack_usage1_pkg.ads] - Blame information for rev 715

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


package Stack_Usage1_Pkg is
 
   function Ident_Int (X : Integer) return Integer;
 
   type R is
       record
          C0, C1, C2, C3, C4, C5, C6, C7, C8, C9 : Integer;
       end record;
 
   procedure My_Proc (X : R);
 
end Stack_Usage1_Pkg;

Line No.	Rev	Author	Line
1	696	jeremybenn	`package Stack_Usage1_Pkg is`
2
3			`function Ident_Int (X : Integer) return Integer;`
4
5			`type R is`
6			`record`
7			`C0, C1, C2, C3, C4, C5, C6, C7, C8, C9 : Integer;`
8			`end record;`
9
10			`procedure My_Proc (X : R);`
11
12			`end Stack_Usage1_Pkg;`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gnat.dg/] [stack_usage1_pkg.ads] - Blame information for rev 715