diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-07 23:40:15 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-07 23:40:15 +0000 |
commit | 20d7225961318f2b7028b6ce66a378dd14d15ef1 (patch) | |
tree | bb097f4bfaa1177a4a54d841d4e3066fb0d8ddac /ext/List/Util | |
parent | 6550321136bf6550564fabac12d7f206fc76aa5b (diff) | |
download | perl-20d7225961318f2b7028b6ce66a378dd14d15ef1.tar.gz |
Extension nits found by -Wall (several from threads
and threads::shared, but leaving them to Arthur).
p4raw-id: //depot/perl@14128
Diffstat (limited to 'ext/List/Util')
-rw-r--r-- | ext/List/Util/Util.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/List/Util/Util.xs b/ext/List/Util/Util.xs index c55fd00358..20b6319d40 100644 --- a/ext/List/Util/Util.xs +++ b/ext/List/Util/Util.xs @@ -276,7 +276,7 @@ CODE: dmy_op.op_targ = 1; PL_op = &dmy_op; PL_curpad = (SV **)&my_pad; - *(PL_ppaddr[OP_RAND])(aTHX); + (void)*(PL_ppaddr[OP_RAND])(aTHX); PL_op = old_op; PL_curpad = old_curpad; for (index = items ; index > 1 ; ) { |