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

Subversion Repositories openrisc

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

Details | Compare with Previous | View Log


package Boolean_Subtype2_Pkg is
 
   type Node_Id is range 0 .. 099_999_999;
   subtype Entity_Id is Node_Id;
 
   function Node20 (N : Node_Id) return Node_Id;
   function Flag63 (N : Node_Id) return Boolean;
   function Present (N : Node_Id) return Boolean;
 
end Boolean_Subtype2_Pkg;

Line No.	Rev	Author	Line
1	696	jeremybenn	`package Boolean_Subtype2_Pkg is`
2
3			`type Node_Id is range 0 .. 099_999_999;`
4			`subtype Entity_Id is Node_Id;`
5
6			`function Node20 (N : Node_Id) return Node_Id;`
7			`function Flag63 (N : Node_Id) return Boolean;`
8			`function Present (N : Node_Id) return Boolean;`
9
10			`end Boolean_Subtype2_Pkg;`

Browse

Tools

Subversion Repositories openrisc

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