From: Yannick Moy Date: Tue, 7 Jul 2020 09:19:47 +0000 (+0200) Subject: [Ada] Clarify protection offered by preconditions on Ada.Text_IO units X-Git-Tag: basepoints/gcc-12~4208 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a6272b85b5f624c5633af243bdf191b8089c892e;p=thirdparty%2Fgcc.git [Ada] Clarify protection offered by preconditions on Ada.Text_IO units gcc/ada/ * libgnat/a-textio.ads: Update top-level comment. --- diff --git a/gcc/ada/libgnat/a-textio.ads b/gcc/ada/libgnat/a-textio.ads index 6e5e39294812..36a4b6583b67 100644 --- a/gcc/ada/libgnat/a-textio.ads +++ b/gcc/ada/libgnat/a-textio.ads @@ -36,8 +36,9 @@ -- Preconditions in this unit are meant for analysis only, not for run-time -- checking, so that the expected exceptions are raised. This is enforced by -- setting the corresponding assertion policy to Ignore. These preconditions --- are partial and protect against Status_Error, Mode_Error, and Layout_Error, --- but not against other types of errors. +-- are partial. They protect fully against Status_Error and Mode_Error, +-- partially against Layout_Error (see SPARK User's Guide for details), and +-- not against other types of errors. pragma Assertion_Policy (Pre => Ignore);