3cb78ef595201a03afe11ab0a1f33e34f6730680
[scilab.git] / scilab / modules / dynamic_link / macros / windows / dlwGet64BitPath.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) DIGITEO - 2010 - Allan CORNET
3 //
4 // This file must be used under the terms of the CeCILL.
5 // This source file is licensed as described in the file COPYING, which
6 // you should have received as part of this distribution.  The terms
7 // are also available at
8 // http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
9
10 //=============================================================================
11 function vcPath64 = dlwGet64BitPath();
12     vcPath64 = [];
13     if win64() then
14         MSCompiler = findmsvccompiler();
15         if (MSCompiler == 'msvc110express' | MSCompiler == 'msvc100express' | MSCompiler == 'msvc90express') then
16             programFilesx86Path = getenv('ProgramFiles(x86)', '');
17             if (programFilesx86Path <> '') then
18                 if isfile(programFilesx86Path + '\Microsoft Visual Studio 11.0\VC\bin\cl.exe') then
19                     vcPath64 = programFilesx86Path + '\Microsoft Visual Studio 11.0';
20                     return
21                 end
22                 
23                 if isfile(programFilesx86Path + '\Microsoft Visual Studio 10.0\VC\bin\amd64\cl.exe') then
24                     vcPath64 = programFilesx86Path + '\Microsoft Visual Studio 10.0';
25                     return
26                 end
27                 
28                 if isfile(programFilesx86Path + '\Microsoft Visual Studio 9.0\VC\bin\amd64\cl.exe') then
29                     vcPath64 = programFilesx86Path + '\Microsoft Visual Studio 9.0';
30                 end
31             end
32         else
33             select MSCompiler,
34             // Microsoft Visual 2012 Studio Professional
35             case  'msvc110pro' then
36                 vcPath64 = dlwGetVc11ProPath();
37             // Microsoft Visual 2010 Studio Professional
38             case  'msvc100pro' then
39                 vcPath64 = dlwGetVc10ProPath();
40             // Microsoft Visual 2008 Studio Professional
41             case  "msvc90pro" then
42                 vcPath64 = dlwGetVc90ProPath();
43             // Microsoft Visual 2008 Studio Standard
44             case  "msvc90std" then
45                 vcPath64 = dlwGetVc90StdPath();
46             else
47                 vcPath64 = [];
48             end
49         end
50     end
51 endfunction
52 //=============================================================================