On Mon Aug 06 15:41:43 2007, jkeen <!-- x --> at verizon.net wrote: > > This is the block in question in config/init/defaults.pm: > > my $archname = $Config{archname}; > if ($m) { > if ( $archname =~ /x86_64/ && $m eq '32' ) { > $archname =~ s/x86_64/i386/; > > # adjust gcc? > for my $cc qw(cc cxx link ld) { > $conf->data->add( ' ', $cc, '-m32' ); > } > > # and lib flags > for my $lib qw(ld_load_flags ld_share_flags ldflags linkflags) { > my $item = $conf->data->get($lib); > ( my $ni = $item ) =~ s/lib64/lib/g; > $conf->data->set( $lib, $ni ); > } > } > } >
The extent to which this code has been covered by tests can be seen here: http://thenceforward.net/parrot/coverage/configure-build/config-init-defaults-pm.html