projects
/
platform
/
upstream
/
gcc.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
a24614e
)
[Ada] Suppress warning in g-socthi__vxworks.adb
author
Bob Duff
<duff@adacore.com>
Tue, 28 Jun 2022 12:28:12 +0000
(08:28 -0400)
committer
Pierre-Marie de Rodat
<derodat@adacore.com>
Tue, 12 Jul 2022 12:24:13 +0000
(12:24 +0000)
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.
gcc/ada/libgnat/g-socthi__vxworks.adb
patch
|
blob
|
history
diff --git
a/gcc/ada/libgnat/g-socthi__vxworks.adb
b/gcc/ada/libgnat/g-socthi__vxworks.adb
index
aeae52d
..
32973b4
100644
(file)
--- 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