OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gnat.dg/] [slice8_pkg2.ads] - Rev 304

Compare with Previous | Blame | View Log

generic
 
   Line_Length : Natural;
   Max_Lines   : Natural;
 
package Slice8_Pkg2 is
 
   Subtype Index      is Natural Range 0..Line_length;
   Subtype Line_Count is Natural Range 0..Max_Lines;
 
   Type Line (Size : Index := 0) is
   Record
      Data : String (1..Size);
   End Record;
 
   Type Lines is Array (Line_Count Range <>) of Line;
 
   Type Paragraph (Size : Line_Count) is
   Record
      Data : Lines (1..Size);
   End Record;
 
end Slice8_Pkg2;
 

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.