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

Subversion Repositories openrisc

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

Details | Compare with Previous | View Log


with Ada.Calendar; use Ada.Calendar;
 
package Opt7 is
 
   type time_t is (Absolute_Time, Delta_Time);
 
   procedure Parse (Str       :     String;
                    Time_Type : out time_t;
                    Abs_Time  : out Time;
                    Delt_Time : out Duration);
 
end Opt7;

Line No.	Rev	Author	Line
1	696	jeremybenn	`with Ada.Calendar; use Ada.Calendar;`
2
3			`package Opt7 is`
4
5			`type time_t is (Absolute_Time, Delta_Time);`
6
7			`procedure Parse (Str : String;`
8			`Time_Type : out time_t;`
9			`Abs_Time : out Time;`
10			`Delt_Time : out Duration);`
11
12			`end Opt7;`

Browse

Tools

Subversion Repositories openrisc

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