在Ada中使用IN OUT

作者: 狗头军师
发布时间: 2024-10-07 07:56:56 (14小时前)

2 条回复

1#
回复此人
v-star*위위 | 2020-08-13 15-13

一个in参数可以读，但不是由子程序写的。in是默认值。在Ada 2012之前，仅允许函数具有in参数。实际参数是一个表达式。一个out参数意味着以前的值是没有兴趣的。子程序应写入参数。写入参数后，子程序可以读回已写入的内容。退出时，实际参数将接收写入的值（该区域存在复杂性！）。实际参数必须是变量。一个in out参数就像是一个out不同之处在于前值感兴趣，可以通过转让前的子程序读取参数。例如， ``` procedure Add (V : Integer; To : in out Integer; Limited_To : Integer) is begin -- Check that the result wont be too large. This involves reading -- the initial value of the 'in out' parameter To, which would be -- wrong if To was a mere 'out' parameter (it would be -- uninitialized). if To + V > Limited_To then To := Limited_To; else To := To + V; end if; end Add; ```

编辑

登录后才能参与评论