a59018c911ba21f0f3adbfd47e9df63d665418e0
[scilab.git] / scilab / modules / dynamic_link / macros / findmsifortcompiler.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) DIGITEO - 200X-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 ifortCompiler = findmsifortcompiler()
12
13     ifortCompiler = "unknown"; // unknown
14
15     if getos() == "Windows" then
16         if getenv("IFORT_COMPILER13","NOK") <> "NOK" then
17             ifortCompiler = "ifort13";
18             return
19         end
20
21         if getenv("IFORT_COMPILER12","NOK") <> "NOK" then
22             ifortCompiler = "ifort12";
23             return
24         end
25
26         if getenv("IFORT_COMPILER11","NOK") <> "NOK" then
27             ifortCompiler = "ifort11";
28             return
29         end
30
31         if getenv("IFORT_COMPILER10","NOK") <> "NOK" then
32             ifortCompiler = "ifort10";
33             return
34         end
35
36         if getenv("IFORT_COMPILER9","NOK") <> "NOK" then
37             ifortCompiler = "ifort9";
38             return
39         end
40     else // NOT Windows
41         ifortCompiler = "unknown"; // unknown
42     end
43 endfunction
44 //=============================================================================
45
46