diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-01-07 23:42:08 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2006-01-08 12:27:29 +0000 |
| commit | afd78fd5455826b5a73217b8c80ab30a9cdad730 (patch) | |
| tree | 8da46ba2de3d4958eff6d7f580dc5407ee3023b3 /mg.c | |
| parent | b6c2855378a705b6278bd4e260febb2b484b9fcd (diff) | |
| download | perl-afd78fd5455826b5a73217b8c80ab30a9cdad730.tar.gz | |
blead: format warnings
Message-ID: <43C01990.6020207@gmail.com>
p4raw-id: //depot/perl@26708
Diffstat (limited to 'mg.c')
| -rw-r--r-- | mg.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1003,13 +1003,13 @@ Perl_magic_get(pTHX_ SV *sv, MAGIC *mg) case '(': sv_setiv(sv, (IV)PL_gid); #ifdef HAS_GETGROUPS - Perl_sv_setpvf(aTHX_ sv, "%"Gid_t_f, (long unsigned int)PL_gid); + Perl_sv_setpvf(aTHX_ sv, "%"Gid_t_f, PL_gid); #endif goto add_groups; case ')': sv_setiv(sv, (IV)PL_egid); #ifdef HAS_GETGROUPS - Perl_sv_setpvf(aTHX_ sv, "%"Gid_t_f, (long unsigned int)PL_egid); + Perl_sv_setpvf(aTHX_ sv, "%"Gid_t_f, PL_egid); #endif add_groups: #ifdef HAS_GETGROUPS @@ -1020,7 +1020,7 @@ Perl_magic_get(pTHX_ SV *sv, MAGIC *mg) num_groups = getgroups(num_groups, gary); while (--num_groups >= 0) Perl_sv_catpvf(aTHX_ sv, " %"Gid_t_f, - (long unsigned int)gary[num_groups]); + gary[num_groups]); Safefree(gary); } #endif |