URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gnat.dg/] [gen_disp.ads] - Rev 338
Compare with Previous | Blame | View Log
with Ada.Streams, Ada.Tags; package gen_disp is type Root_Type is tagged null record; function Root_Type_Class_Input (S : not null access Ada.Streams.Root_Stream_Type'Class) return Root_Type'Class; for Root_Type'Class'Input use Root_Type_Class_Input; end gen_disp;