Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
14
Task/Optional-parameters/Ada/optional-parameters-1.ada
Normal file
14
Task/Optional-parameters/Ada/optional-parameters-1.ada
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
package Tables is
|
||||
|
||||
type Table is private;
|
||||
|
||||
type Ordering is (Lexicographic, Psionic, ...); -- add others
|
||||
|
||||
procedure Sort (It : in out Table;
|
||||
Order_By : in Ordering := Lexicographic;
|
||||
Column : in Positive := 1;
|
||||
Reverse_Ordering : in Boolean := False);
|
||||
|
||||
private
|
||||
... -- implementation specific
|
||||
end Tables;
|
||||
Loading…
Add table
Add a link
Reference in a new issue