如何将数组传递给Ada中的过程？

Question

我似乎无法找到有关如何执行此操作的任何信息.有没有人知道如何将数组传递给一个过程,就像你将一个字符或整数一样？

例子会很棒.

Answer 1

首先,您必须具有指定的数组类型.匿名类型将无法工作(匿名类型在任何情况下都是一个坏主意).

例如,在包标准中声明了一个名为String的数组类型:

type String is array (Positive range <>) of Character;

String与任何其他数组类型没有区别.您将String(或任何其他数组类型)完全按照您执行任何其他类型的方式传递给子程序:

function Index (Source : in String; Pattern : in String) return Natural;
procedure To_Upper (Source : in out String);