diff options
| author | Steve Hay <SteveHay@planit.com> | 2007-04-24 12:17:00 +0000 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2007-04-24 12:17:00 +0000 |
| commit | eac04b2ef27e534c1394ef750a2964e023781dd9 (patch) | |
| tree | c042ff824029316bcc57636fba1d4d4748117dd5 /ext | |
| parent | 9e6e12112c10f1809160cb40af4fdf30fb0d160c (diff) | |
| download | perl-eac04b2ef27e534c1394ef750a2964e023781dd9.tar.gz | |
Silence 5 "possible loss of data" warnings from VC6
p4raw-id: //depot/perl@31055
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/Devel/Peek/Peek.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/Devel/Peek/Peek.xs b/ext/Devel/Peek/Peek.xs index a88d23141d..e1c62c3ff5 100644 --- a/ext/Devel/Peek/Peek.xs +++ b/ext/Devel/Peek/Peek.xs @@ -348,7 +348,7 @@ PPCODE: PL_dumpindent = 2; do_sv_dump(0, Perl_debug_log, sv, 0, lim, (bool)(dumpop && SvTRUE(dumpop)), pv_lim); - PL_dumpindent = save_dumpindent; + PL_dumpindent = (U16)save_dumpindent; } void @@ -368,7 +368,7 @@ PPCODE: do_sv_dump(0, Perl_debug_log, ST(i), 0, lim, (bool)(dumpop && SvTRUE(dumpop)), pv_lim); } - PL_dumpindent = save_dumpindent; + PL_dumpindent = (U16)save_dumpindent; } void |