-my $unit = { bits => 8, size => 1 };
-if (not is_little_endian()) {
- print "Forcing unit size of 8 on non-little-endian systems.\n";
-} else {
- print "Checking unit size in bits... ";
- my $align = $Config{alignbytes} || 1;
- my @bits = (8, 16, 32, 64);
- for my $bits (@bits) {
- my $size = $Config{"u${bits}size"};
- next unless $size;
- $unit = { bits => $bits, size => $size } if $size && $size <= $align;
- }
- print $unit->{bits},
+my %PARAMS;
+my @DEFINES;
+
+if (defined $cc and defined $ld) {
+ $PARAMS{C} = [ 'Util.c' ];
+ $PARAMS{XS} = { 'Util.xs' => 'Util.c' };
+ $PARAMS{CC} = $cc;
+ $PARAMS{LD} = $ld;
+
+ my $unit = { bits => 8, size => 1 };
+ if (not is_little_endian()) {
+ print "Forcing unit size of 8 on non-little-endian systems.\n";
+ } else {
+ print "Checking unit size in bits... ";
+ my $align = $Config{alignbytes} || 1;
+ my @bits = (8, 16, 32, 64);
+ for my $bits (@bits) {
+ my $size = $Config{"u${bits}size"};
+ next unless $size;
+ $unit = { bits => $bits, size => $size } if $size && $size <= $align;
+ }
+ print $unit->{bits},