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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gnat.dg/] [slice8_pkg2.ads] - Rev 696

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.