RosettaCodeData/Task/Call-a-function/Ada/call-a-function-5.ada

4 lines
109 B
Ada
Raw Permalink Normal View History

2013-04-10 16:57:12 -07:00
Positional := H(A, F'Access);
Named := H(Int => A, Fun => F'Access);
Mixed := H(A, Fun=>F'Access);