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

3 lines
109 B
Ada

Positional := H(A, F'Access);
Named := H(Int => A, Fun => F'Access);
Mixed := H(A, Fun=>F'Access);