annotate gcc/ada/libgnat/a-cgarso.ads @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children 1830386684a0
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 ------------------------------------------------------------------------------
kono
parents:
diff changeset
2 -- --
kono
parents:
diff changeset
3 -- GNAT LIBRARY COMPONENTS --
kono
parents:
diff changeset
4 -- --
kono
parents:
diff changeset
5 -- A D A . C O N T A I N E R S . G E N E R I C _ A R R A Y _ S O R T --
kono
parents:
diff changeset
6 -- --
kono
parents:
diff changeset
7 -- S p e c --
kono
parents:
diff changeset
8 -- --
kono
parents:
diff changeset
9 -- This specification is derived from the Ada Reference Manual for use with --
kono
parents:
diff changeset
10 -- GNAT. In accordance with the copyright of that document, you can freely --
kono
parents:
diff changeset
11 -- copy and modify this specification, provided that if you redistribute a --
kono
parents:
diff changeset
12 -- modified version, any changes that you have made are clearly indicated. --
kono
parents:
diff changeset
13 -- --
kono
parents:
diff changeset
14 ------------------------------------------------------------------------------
kono
parents:
diff changeset
15
kono
parents:
diff changeset
16 generic
kono
parents:
diff changeset
17 type Index_Type is (<>);
kono
parents:
diff changeset
18 type Element_Type is private;
kono
parents:
diff changeset
19 type Array_Type is array (Index_Type range <>) of Element_Type;
kono
parents:
diff changeset
20
kono
parents:
diff changeset
21 with function "<" (Left, Right : Element_Type)
kono
parents:
diff changeset
22 return Boolean is <>;
kono
parents:
diff changeset
23
kono
parents:
diff changeset
24 procedure Ada.Containers.Generic_Array_Sort (Container : in out Array_Type);
kono
parents:
diff changeset
25
kono
parents:
diff changeset
26 pragma Pure (Ada.Containers.Generic_Array_Sort);