RosettaCodeData/Task/Call-a-function/Ada/call-a-function-2.ada
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

5 lines
189 B
Ada

function F(X: Integer; Y: Integer := 0) return Integer; -- Y is optional
...
A : Integer := F(12);
B : Integer := F(12, 0); -- the same as A
C : Integer := F(12, 1); -- something different