summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2001-07-02 07:12:10 +0000
committerGurusamy Sarathy <gsar@cpan.org>2001-07-02 07:12:10 +0000
commit25716404fbbde2ca91832aab8c9157aafcdcc7e8 (patch)
tree373243337e32a41b725e311b058e5b7c3ff247b1 /pp.c
parent8337181f54c3501595fb014edfb15b1033b90568 (diff)
downloadperl-25716404fbbde2ca91832aab8c9157aafcdcc7e8.tar.gz
win32 fixes: fix various syntax errors ("no preprocessor directives
within macro arguments") and warnings ("unary minus applied to unsigned type", among others) p4raw-id: //depot/perl@11066
Diffstat (limited to 'pp.c')
-rw-r--r--pp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/pp.c b/pp.c
index 0b7479455c..51e10def89 100644
--- a/pp.c
+++ b/pp.c
@@ -943,7 +943,7 @@ PP(pp_multiply)
/* 2s complement assumption that (UV)-IV_MIN is correct. */
/* -ve result, which could overflow an IV */
SP--;
- SETi( -product );
+ SETi( -(IV)product );
RETURN;
} /* else drop to NVs below. */
} else {
@@ -980,7 +980,7 @@ PP(pp_multiply)
/* 2s complement assumption again */
/* -ve result, which could overflow an IV */
SP--;
- SETi( -product_low );
+ SETi( -(IV)product_low );
RETURN;
} /* else drop to NVs below. */
}