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

Subversion Repositories openrisc

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

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


with Ada.Exceptions; use Ada.Exceptions;
 
package Noreturn2 is
 
   procedure Raise_From (X : Exception_Occurrence);
   pragma No_Return (Raise_From);
 
end Noreturn2;

Line No.	Rev	Author	Line
1	696	jeremybenn	`with Ada.Exceptions; use Ada.Exceptions;`
2
3			`package Noreturn2 is`
4
5			`procedure Raise_From (X : Exception_Occurrence);`
6			`pragma No_Return (Raise_From);`
7
8			`end Noreturn2;`

Browse

Tools

Subversion Repositories openrisc

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