Ada 编程/属性/'Pred
外观
X'Pred(Y) 是 Ada 属性,其中 X 是任何离散类型,Y 是该类型的值。此属性表示位置编号比输入参数小 1 的离散值。
返回的离散值类型是离散类型的基本类型。如果输入参数是离散类型的 First 值,则会引发 CONSTRAINT_ERROR 异常。
type
My_Enumis
(Enum1, Enum2, Enum3); ...pragma
Assert (My_Enum'Pred (Enum2) = Enum1); -- OKpragma
Assert (My_Enum'Pred (Enum1) = Enum3); -- Wrong
- 13.3 操作和表示属性 (注释)
- 附录 K 语言定义的属性 (注释)