'VADS_Size 属性旨在简化移植依赖于 VADS Ada 83 编译器实现的 'Size 语义的遗留代码。GNAT 尽力复制相同的语义解释。特别是,应用于无大小子句的预定义或其他基本类型的 'VADS_Size 会产生 Object_Size(例如,在典型的机器上,Natural'Size 为 32 而不是 31)。此外,应用于对象的 'VADS_Size 会产生通过将属性应用于相应类型获得的结果。
'VADS_Size
'Size
Natural'Size