Ticket #248: tt248-skip-msvc.patch

File tt248-skip-msvc.patch, 0.6 KB (added by rurban, 13 years ago)

  • config/auto/msvc.pm

     
    3232sub runstep { 
    3333    my ( $self, $conf ) = ( shift, shift ); 
    3434 
     35    if ($conf->data->get('gccversion')) { 
     36        my $verbose = $conf->options->get('verbose'); 
     37        print " (skipped) " if $verbose; 
     38        $self->set_result('skipped'); 
     39        $conf->data->set( msvcversion => undef ); 
     40        return 1; 
     41    } 
    3542    my $msvcref = _probe_for_msvc($conf); 
    3643 
    3744    $self->_evaluate_msvc($conf, $msvcref);