diff options
| author | David Mitchell <davem@iabyn.com> | 2013-11-12 16:00:35 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2013-11-13 10:38:40 +0000 |
| commit | d53d746d7653edf30c84f42071cfb3f0b1ab999e (patch) | |
| tree | f1e4e42625428c025a99df6ed86ceec80ce67e1c /ext/File-DosGlob | |
| parent | 99639b5bcd7d00af937de9cdb096a172d7cd5592 (diff) | |
| download | perl-d53d746d7653edf30c84f42071cfb3f0b1ab999e.tar.gz | |
File-DosGlob: silence some compiler warnings
Diffstat (limited to 'ext/File-DosGlob')
| -rw-r--r-- | ext/File-DosGlob/DosGlob.xs | 3 | ||||
| -rw-r--r-- | ext/File-DosGlob/lib/File/DosGlob.pm | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/ext/File-DosGlob/DosGlob.xs b/ext/File-DosGlob/DosGlob.xs index cbd9178e49..6123b75201 100644 --- a/ext/File-DosGlob/DosGlob.xs +++ b/ext/File-DosGlob/DosGlob.xs @@ -22,7 +22,7 @@ glob_ophook(pTHX_ OP *o) if (!MY_CXT.x_DG_ENTRIES) MY_CXT.x_DG_ENTRIES = get_hv("File::DosGlob::entries", 0); if (MY_CXT.x_DG_ENTRIES) - hv_delete(MY_CXT.x_DG_ENTRIES, (char *)&o, sizeof(OP *),G_DISCARD); + (void)hv_delete(MY_CXT.x_DG_ENTRIES, (char *)&o, sizeof(OP *),G_DISCARD); if (MY_CXT.x_DG_OLD_OPHOOK) MY_CXT.x_DG_OLD_OPHOOK(aTHX_ o); } } @@ -45,6 +45,7 @@ BOOT: SV * _callsite(...) CODE: + PERL_UNUSED_VAR(items); RETVAL = newSVpvn( (char *)&cxstack[cxstack_ix].blk_sub.retop, sizeof(OP *) ); diff --git a/ext/File-DosGlob/lib/File/DosGlob.pm b/ext/File-DosGlob/lib/File/DosGlob.pm index 1c5ef5369a..9d40a36347 100644 --- a/ext/File-DosGlob/lib/File/DosGlob.pm +++ b/ext/File-DosGlob/lib/File/DosGlob.pm @@ -6,7 +6,7 @@ package File::DosGlob; -our $VERSION = '1.11'; +our $VERSION = '1.12'; use strict; use warnings; |