From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 1914) id CE387383DBAA; Tue, 12 Jul 2022 12:26:32 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org CE387383DBAA MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset="utf-8" From: Pierre-Marie de Rodat To: gcc-cvs@gcc.gnu.org Subject: [gcc r13-1636] [Ada] Suppress warning in g-socthi__vxworks.adb X-Act-Checkin: gcc X-Git-Author: Bob Duff X-Git-Refname: refs/heads/master X-Git-Oldrev: a24614ec4918d00f0c0761ba987cd15374b3ac43 X-Git-Newrev: fa7ea64706f7d4b1302360818c87bf5970d59a0c Message-Id: <20220712122632.CE387383DBAA@sourceware.org> Date: Tue, 12 Jul 2022 12:26:32 +0000 (GMT) X-BeenThere: gcc-cvs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-cvs mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Tue, 12 Jul 2022 12:26:32 -0000 https://gcc.gnu.org/g:fa7ea64706f7d4b1302360818c87bf5970d59a0c commit r13-1636-gfa7ea64706f7d4b1302360818c87bf5970d59a0c Author: Bob Duff Date: Tue Jun 28 08:28:12 2022 -0400 [Ada] Suppress warning in g-socthi__vxworks.adb Follow-on to previous change, which missed the vxworks version of this package. gcc/ada/ * libgnat/g-socthi__vxworks.adb (C_Connect): Suppress new warning. Diff: --- gcc/ada/libgnat/g-socthi__vxworks.adb | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/gcc/ada/libgnat/g-socthi__vxworks.adb b/gcc/ada/libgnat/g-socthi__vxworks.adb index aeae52d2a02..32973b4b129 100644 --- a/gcc/ada/libgnat/g-socthi__vxworks.adb +++ b/gcc/ada/libgnat/g-socthi__vxworks.adb @@ -190,7 +190,9 @@ package body GNAT.Sockets.Thin is return Res; end if; - declare + pragma Warnings (Off, "unreachable code"); + declare -- unreachable if Thread_Blocking_IO is statically True + pragma Warnings (On, "unreachable code"); WSet : aliased Fd_Set; Now : aliased Timeval; begin