URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gnat.dg/] [discr31.ads] - Rev 714
Go to most recent revision | Compare with Previous | Blame | View Log
package Discr31 is type Byte_List_Type is array(Positive range <>) of Integer; type Log_Item_Type(Last : Natural) is record Data : Byte_List_Type(1 .. Last) := (others => 0); Link : Natural := 0; end record; type Packet_Data_Type is access Log_Item_Type; function Log_Item(Packet : in Packet_Data_Type) return Log_Item_Type; end Discr31;
Go to most recent revision | Compare with Previous | Blame | View Log