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/] [discr16_pkg.ads] - Blame information for rev 304

Details | Compare with Previous | View Log


package Discr16_Pkg is
 
  type ET3a is (E1, E2, E3, E4, E5);
  for ET3a use (E1=> 32_001, E2=> 32_002, E3=> 32_003,
                E4=> 32_004, E5=> 32_005);
 
end;

Line No.	Rev	Author	Line
1	304	jeremybenn	`package Discr16_Pkg is`
2
3			`type ET3a is (E1, E2, E3, E4, E5);`
4			`for ET3a use (E1=> 32_001, E2=> 32_002, E3=> 32_003,`
5			`E4=> 32_004, E5=> 32_005);`
6
7			`end;`

Browse

Tools

Subversion Repositories openrisc_me

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