msvc80opts - # $Revision: 1.1.10.4 $ sub msvc80opts cfw_ my...

Info iconThis preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon
# $Revision: 1.1.10.4 $ sub msvc80opts { my $input = shift; my $default_location = "C:\\Program Files\\Microsoft Visual Studio 8"; my @language_handled = ('C'); my $locate_fcn = sub { my @msvc8_roots = (); my $msvc8_root; my $oldPath; my $registry_lookup_fcn = $input->{"registry_lookup"}; # Search the default environment variable location. # Since MSVC 2005 professional ed. and the express ed. # use the same environment variable (VS80COMNTOOLS), # use the directory structure to differentiate between the two. if ($ENV{'VS80COMNTOOLS'} ne "" && -e "$ENV{'VS80COMNTOOLS'}\\. .\\. !-e "$ENV{'VS80COMNTOOLS'}\\. .\\IDE\\VCExpress.exe"){ $msvc8_root = $ENV{'VS80COMNTOOLS'}; $msvc8_root =~ s|\\+Common7\\+Tools\\*$||i; $oldPath = $ENV{'PATH'}; $ENV{'PATH'} = "$msvc8_root\\Common7\\IDE;$oldPath"; if (&correct_version("$msvc8_root\\VC\\bin\\cl.exe","14.0")){ push(@msvc8_roots, $msvc8_root); } $ENV{'PATH'} = "$oldPath"; } # Search the registry. $msvc8_root =
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
Image of page 2
This is the end of the preview. Sign up to access the rest of the document.

This document was uploaded on 01/17/2011.

Page1 / 2

msvc80opts - # $Revision: 1.1.10.4 $ sub msvc80opts cfw_ my...

This preview shows document pages 1 - 2. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online