This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 522dba3) | patch
gv.c, mg.c: fix 32-bit compiler warnings
authorDavid Mitchell <davem@iabyn.com>
Mon, 12 Jun 2017 12:31:22 +0000 (13:31 +0100)
committerDavid Mitchell <davem@iabyn.com>
Mon, 12 Jun 2017 20:11:02 +0000 (21:11 +0100)
commitfa531f329e4f1fbd1d51dc1d40cc900089487939
tree2ac6f4bd81c04626552f0f79c9298d0c65e2ebe4tree | snapshot
parent522dba3426c18f53b5e3a09c16b13670d4bafd6dcommit | diff
gv.c, mg.c: fix 32-bit compiler warnings

    mg.c:641:21: warning: cast from pointer to integer of different size
    [-Wpointer-to-int-cast]
             UV uv = (UV)mg->mg_obj;

It's storing a char-ranged integer value as an SV*. By using SSize_t
rather than UV to store the char, it avoids mismatched size warnings.
gv.c diff | blob | blame | history
mg.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.