diff options
| author | David Mitchell <davem@iabyn.com> | 2013-11-24 19:44:41 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2013-11-24 20:24:25 +0000 |
| commit | 04783dc7025287c5d75ab531602c7ec786a1e787 (patch) | |
| tree | 049174f15e0cc2c532f5e4b5b072a8fa42350df6 /ext | |
| parent | 7616a0c2898b38b86404e7b0afa635e0bf786677 (diff) | |
| download | perl-04783dc7025287c5d75ab531602c7ec786a1e787.tar.gz | |
fix 'ignoring return value' compiler warnings
Various system functions like write() are marked with the
__warn_unused_result__ attribute, which causes an 'ignoring return value'
warning to be emitted, even if the function call result is cast to (void).
The generic solution seems to be
int rc = write(...);
PERL_UNUSED_VAR(rc);
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/SDBM_File/sdbm/sdbm.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/ext/SDBM_File/sdbm/sdbm.c b/ext/SDBM_File/sdbm/sdbm.c index f2c213ca2d..f5f893cb18 100644 --- a/ext/SDBM_File/sdbm/sdbm.c +++ b/ext/SDBM_File/sdbm/sdbm.c @@ -301,6 +301,9 @@ makroom(DBM *db, long int hash, int need) char *pag = db->pagbuf; char *New = twin; int smax = SPLTMAX; +#ifdef BADMESS + int rc; +#endif do { /* @@ -375,7 +378,9 @@ makroom(DBM *db, long int hash, int need) * we still cannot fit the key. say goodnight. */ #ifdef BADMESS - (void) write(2, "sdbm: cannot insert after SPLTMAX attempts.\n", 44); + rc = write(2, "sdbm: cannot insert after SPLTMAX attempts.\n", 44); + (void)rc; + #endif return 0; |