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

Subversion Repositories openrisc

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

Details | Compare with Previous | View Log


with Rep_Clause5_Pkg; use Rep_Clause5_Pkg;
 
package Rep_Clause5 is
 
    Bad_Number : exception;
    Too_Large  : exception;
 
    type LNumber_Type is range 0..99999;
 
    procedure Merge_Numbered(LNodes : in out LNodes_Ptr);
 
end Rep_Clause5;

Line No.	Rev	Author	Line
1	696	jeremybenn	`with Rep_Clause5_Pkg; use Rep_Clause5_Pkg;`
2
3			`package Rep_Clause5 is`
4
5			`Bad_Number : exception;`
6			`Too_Large : exception;`
7
8			`type LNumber_Type is range 0..99999;`
9
10			`procedure Merge_Numbered(LNodes : in out LNodes_Ptr);`
11
12			`end Rep_Clause5;`

Browse

Tools

Subversion Repositories openrisc

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