diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2018-10-09 15:06:46 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2018-10-09 15:06:46 +0000 |
| commit | 005f870e9145c83cba08cab71ed9c0de5bb08e2c (patch) | |
| tree | 24092813a3bc51a0549f2115239c80f287591877 /gcc/ada/socket.c | |
| parent | ea891b439e876000d139e45f44c49b9436d195a4 (diff) | |
| download | gcc-005f870e9145c83cba08cab71ed9c0de5bb08e2c.zip gcc-005f870e9145c83cba08cab71ed9c0de5bb08e2c.tar.gz gcc-005f870e9145c83cba08cab71ed9c0de5bb08e2c.tar.bz2 | |
[Ada] Minor tweaks to suppress warnings
2018-10-09 Eric Botcazou <ebotcazou@adacore.com>
gcc/ada/
* adaint.c (__gnat_get_executable_suffix_ptr): Add new line.
(__gnat_locate_exec): Check that HOST_EXECUTABLE_SUFFIX is not
empty before doing a string search for it.
* socket.c (ATTRIBUTE_UNUSED): Define.
(__gnat_disable_sigpipe): Add ATTRIBUTE_UNUSED on parameter.
* terminals.c (ATTRIBUTE_UNUSED): Move around.
(__gnat_setup_child_communication): Add ATTRIBUTE_UNUSED on
parameter.
(__gnat_send_header): Add ATTRIBUTE_UNUSED on parameters.
From-SVN: r264982
Diffstat (limited to 'gcc/ada/socket.c')
| -rw-r--r-- | gcc/ada/socket.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/socket.c b/gcc/ada/socket.c index 2de38a9..ed5b8df 100644 --- a/gcc/ada/socket.c +++ b/gcc/ada/socket.c @@ -31,6 +31,8 @@ /* This file provides a portable binding to the sockets API */ +#define ATTRIBUTE_UNUSED __attribute__((unused)) + /* Ensure access to errno is thread safe. */ #define _REENTRANT #define _THREAD_SAFE @@ -95,7 +97,7 @@ extern int __gnat_inet_pton (int, const char *, void *); /* Disable the sending of SIGPIPE for writes on a broken stream */ void -__gnat_disable_sigpipe (int fd) +__gnat_disable_sigpipe (int fd ATTRIBUTE_UNUSED) { #ifdef SO_NOSIGPIPE int val = 1; |