如何在 Ada 中使用消息引发异常

Question

我在以 C# 背景所习惯的方式引发异常方面遇到了一些困难。

我有一个实用函数，它期望输入值处于由外部标准定义的非常特定的范围内。如果提供的值超出该范围（并且该范围中间有一个值也是无效的），那么我想向调用者引发异常，以便它们中断。

据我所知，语法是raise Invalid_Argument;

但是-是否可以提供一条带有例外情况的消息？例如，Invalid_Argument例外情况在某种程度上是不言自明的，但我可以看到更多详细信息，说明该参数出了什么问题。如何编写简短的错误消息以陷入异常？

Answer 1

它曾经是（Ada 95）你必须写的

\n\n

Ada.Exceptions.Raise_Exception (Invalid_Argument\xe2\x80\x99Identity,\n                                "message");\n

\n\n

（参见Ada95RM 11.4.2 (6)）但自 Ada 2005 以来，您\xe2\x80\x99已经能够说

\n\n

raise Invalid_Argument with "message";\n

\n\n

（A2005RM 11.3）。

\n\n

请注意，字符串部分是字符串表达式，因此您可以添加一些内容来描述实际的无效值（如果有用）。

\n