diff options
author | Karl Williamson <khw@cpan.org> | 2019-04-12 13:09:59 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-04-12 14:02:33 -0600 |
commit | 10be8dab8d65a6acbedbff4f9285afc7cd30e8e6 (patch) | |
tree | 17b605fd6e5d3cf63a1ee7680d02f6d7167ced94 /pp.c | |
parent | 7784d340f7d5a43a56f8f1a0513d2283f3342cb0 (diff) | |
download | perl-10be8dab8d65a6acbedbff4f9285afc7cd30e8e6.tar.gz |
pp.c: Silence some MS VC warnings
These are bogus warnings.
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 15 |
1 files changed, 8 insertions, 7 deletions
@@ -1316,8 +1316,9 @@ PP(pp_multiply) alow = aiv; auvok = TRUE; /* effectively it's a UV now */ } else { - /* abs, auvok == false records sign */ - alow = -(UV)aiv; + /* abs, auvok == false records sign; Using 0- here and + * later to silence bogus warning from MS VC */ + alow = (UV) (0 - (UV) aiv); } } if (buvok) { @@ -1329,7 +1330,7 @@ PP(pp_multiply) buvok = TRUE; /* effectively it's a UV now */ } else { /* abs, buvok == false records sign */ - blow = -(UV)biv; + blow = (UV) (0 - (UV) biv); } } @@ -1564,7 +1565,7 @@ PP(pp_modulo) right = biv; right_neg = FALSE; /* effectively it's a UV now */ } else { - right = -(UV)biv; + right = (UV) (0 - (UV) biv); } } } @@ -1594,7 +1595,7 @@ PP(pp_modulo) left = aiv; left_neg = FALSE; /* effectively it's a UV now */ } else { - left = -(UV)aiv; + left = (UV) (0 - (UV) aiv); } } } @@ -1893,7 +1894,7 @@ PP(pp_subtract) auv = aiv; auvok = 1; /* Now acting as a sign flag. */ } else { - auv = -(UV)aiv; + auv = (UV) (0 - (UV) aiv); } } a_valid = 1; @@ -1913,7 +1914,7 @@ PP(pp_subtract) buv = biv; buvok = 1; } else - buv = -(UV)biv; + buv = (UV) (0 - (UV) biv); } /* ?uvok if value is >= 0. basically, flagged as UV if it's +ve, else "IV" now, independent of how it came in. |