summaryrefslogtreecommitdiffstats
path: root/perl-install/c/stuff.xs.pl
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/c/stuff.xs.pl')
-rw-r--r--perl-install/c/stuff.xs.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl
index 252e889b7..79ba11acb 100644
--- a/perl-install/c/stuff.xs.pl
+++ b/perl-install/c/stuff.xs.pl
@@ -249,8 +249,8 @@ add_partition(hd, part_number, start_sector, size_sector)
unsigned long size_sector
CODE:
{
- long long start = start_sector * 512;
- long long size = size_sector * 512;
+ long long start = (long long) start_sector * 512;
+ long long size = (long long) size_sector * 512;
struct blkpg_partition p = { start, size, part_number, "", "" };
struct blkpg_ioctl_arg s = { BLKPG_ADD_PARTITION, 0, sizeof(struct blkpg_partition), (void *) &p };
RETVAL = ioctl(hd, BLKPG, &s) == 0;