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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gnat.dg/] [discr11.ads] - Blame information for rev 328

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


with Discr11_Pkg; use Discr11_Pkg;
 
package Discr11 is
   type DT_2 is new DT_1 with record
     More : Integer;
   end record;
 
   function Create return DT_2;
end Discr11;

Line No.	Rev	Author	Line
1	304	jeremybenn	`with Discr11_Pkg; use Discr11_Pkg;`
2
3			`package Discr11 is`
4			`type DT_2 is new DT_1 with record`
5			`More : Integer;`
6			`end record;`
7
8			`function Create return DT_2;`
9			`end Discr11;`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gnat.dg/] [discr11.ads] - Blame information for rev 328