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/] [invariant_index.ads] - Rev 308

package Invariant_Index is
 
   Name_Buffer : String (1 .. 100);
   Name_Len : Natural;
 
   procedure Proc (S : String);
 
end Invariant_Index;