diff options
| author | Bob Duff <duff@adacore.com> | 2019-12-16 10:35:09 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-12-16 10:35:09 +0000 |
| commit | eb2ff584d58ac4664ff3e99d5fe7bf9eaa262bec (patch) | |
| tree | 7aba7a542aaba5a3d19acb81ded0924361d3c0d7 /gcc/ada/errout.ads | |
| parent | 1cbd208038a63b4edaadd6b375ec5cdca5d90968 (diff) | |
| download | gcc-eb2ff584d58ac4664ff3e99d5fe7bf9eaa262bec.zip gcc-eb2ff584d58ac4664ff3e99d5fe7bf9eaa262bec.tar.gz gcc-eb2ff584d58ac4664ff3e99d5fe7bf9eaa262bec.tar.bz2 | |
[Ada] Check for "size for" in Special_Msg_Delete
2019-12-16 Bob Duff <duff@adacore.com>
gcc/ada/
* errout.ads, errout.adb (Is_Size_Too_Small_Message): Check for
"size for" instead of "size for& too small, minimum allowed is
^".
From-SVN: r279438
Diffstat (limited to 'gcc/ada/errout.ads')
| -rw-r--r-- | gcc/ada/errout.ads | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads index dfa6b86..64acff4 100644 --- a/gcc/ada/errout.ads +++ b/gcc/ada/errout.ads @@ -954,6 +954,7 @@ package Errout is -- WARNING: There is a matching C declaration of this subprogram in fe.h + function Is_Size_Too_Small_Message (S : String) return Boolean; Size_Too_Small_Message : constant String := "size for& too small, minimum allowed is ^"; -- This message is explicitly tested in Special_Msg_Delete in the package |