diff options
| author | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2003-12-27 18:39:20 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2003-12-27 16:55:54 +0000 |
| commit | 028f8eaac9a8e1c5eecaca563e816ed1d443dc17 (patch) | |
| tree | 2eb652ed1778bc23aeb76273fb938cb22ae8558f /sv.c | |
| parent | 24b2a273a08bacf9bdb36f18e9091329f41183d6 (diff) | |
| download | perl-028f8eaac9a8e1c5eecaca563e816ed1d443dc17.tar.gz | |
Remove Win32 compiler warnings
From: "Marcus Holland-Moritz" <mhx-perl@gmx.net>
Message-ID: <018901c3cc97$fa976660$d500a8c0@R2D2>
p4raw-id: //depot/perl@21971
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -8547,7 +8547,7 @@ F0convert(NV nv, char *endbuf, STRLEN *len) nv = -nv; if (nv < UV_MAX) { nv += 0.5; - uv = nv; + uv = (UV)nv; if (uv & 1 && uv == nv) uv--; /* Round to even */ do { @@ -8641,7 +8641,7 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const char *pat, STRLEN patlen, va_list *args, SV pp = pat + 2; while (*pp >= '0' && *pp <= '9') digits = 10 * digits + (*pp++ - '0'); - if (pp - pat == patlen - 1) { + if (pp - pat == (int)patlen - 1) { NV nv; if (args) |