diff options
author | David Mitchell <davem@iabyn.com> | 2020-12-01 15:12:14 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2020-12-01 15:12:14 +0000 |
commit | 4e49ae2fc23076c138d32159db1884deda8905ad (patch) | |
tree | 027afb92b40878c22a97c9bdd671d394000c2a90 /ext/ODBM_File | |
parent | 1380c4f3b8014de5b3d8522690cff7ac5c6162b9 (diff) | |
download | perl-4e49ae2fc23076c138d32159db1884deda8905ad.tar.gz |
ODBM_File.xs: silence -Wc++-compat warning
Under gcc -Wc++-compat, it warns that 'delete' is a keyword. Since this
is the name of the actual function in odbm, just temporarily disable
the warning.
Diffstat (limited to 'ext/ODBM_File')
-rw-r--r-- | ext/ODBM_File/ODBM_File.pm | 2 | ||||
-rw-r--r-- | ext/ODBM_File/ODBM_File.xs | 8 |
2 files changed, 9 insertions, 1 deletions
diff --git a/ext/ODBM_File/ODBM_File.pm b/ext/ODBM_File/ODBM_File.pm index 7bdbecc73c..1b49440f3a 100644 --- a/ext/ODBM_File/ODBM_File.pm +++ b/ext/ODBM_File/ODBM_File.pm @@ -7,7 +7,7 @@ require Tie::Hash; require XSLoader; our @ISA = qw(Tie::Hash); -our $VERSION = "1.16"; +our $VERSION = "1.17"; XSLoader::load(); diff --git a/ext/ODBM_File/ODBM_File.xs b/ext/ODBM_File/ODBM_File.xs index 9b708119ae..38e6dbf446 100644 --- a/ext/ODBM_File/ODBM_File.xs +++ b/ext/ODBM_File/ODBM_File.xs @@ -181,6 +181,14 @@ int odbm_DELETE(db, key) ODBM_File db datum_key key + CODE: + /* don't warn about 'delete' being a C++ keyword */ + GCC_DIAG_IGNORE_STMT(-Wc++-compat); + RETVAL = odbm_DELETE(db, key); + GCC_DIAG_RESTORE_STMT; + OUTPUT: + RETVAL + datum_key odbm_FIRSTKEY(db) |