Remove references to MALLOC.lib + old useless Makefile.in
[scilab.git] / scilab / modules / dynamic_link / macros / ilib_gen_Make.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) ENPC
3 // Copyright (C) DIGITEO - 2009-2011 - Allan CORNET
4 //
5 // This file must be used under the terms of the CeCILL.
6 // This source file is licensed as described in the file COPYING, which
7 // you should have received as part of this distribution.  The terms
8 // are also available at
9 // http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
10
11 //=============================================================================
12 function Makename = ilib_gen_Make(name, ..
13                                  tables, ..
14                                  files, ..
15                                  libs, ..
16                                  makename, ..
17                                  with_gateway, ..
18                                  ldflags, ..
19                                  cflags, ..
20                                  fflags, ..
21                                  cc)
22
23   [lhs,rhs] = argn(0);
24   if rhs < 4 then
25     error(msprintf(gettext("%s: Wrong number of input argument(s).\n"), "ilib_gen_Make"));
26     return
27   end
28
29   if argn(2) < 6 then
30     with_gateway = %t
31     ldflags = '';
32     cflags = '';
33     fflags = '';
34     cc = '';
35   end
36   
37   if ~isempty(files) & ~and(isfile(files)) then
38      error(999, msprintf(_("%s: Wrong value for input argument #%d: existing file(s) expected.\n"), "ilib_gen_Make", 3));
39   end  
40   
41   // remove duplicate files
42   files = unique(files);
43   
44   if getos() <> 'Windows' then
45
46     // change table if necessary
47     if typeof(tables)<>'list' then
48       tables= list(tables)
49     end
50     L = length(tables);
51     for it = 1:L
52       table = tables(it);
53       [mt, nt] = size(table);
54
55       if nt == 2 then
56         col = "csci";
57         table = [table, col(ones(mt,1))];
58         nt = 3;
59       end
60
61       if nt <> 3 then
62         error(msprintf(gettext("%s: Wrong size for input argument #%d.\n"), "ilib_gen_Make", 2));
63       end
64
65       tables(it) = table;
66     end
67
68     Makename = makename;
69     ilib_gen_Make_unix(name, files, libs, name, ldflags, cflags, fflags, cc, tables)
70   else
71     //
72     // Windows
73     //
74     // Load dynamic_link Internal lib if it's not already loaded
75     if ~ exists("dynamic_linkwindowslib") then
76       load("SCI/modules/dynamic_link/macros/windows/lib");
77     end
78     library_name = []; // auto. name library
79     Makename = dlwGenerateMakefile(name, ..
80                                  tables, ..
81                                  files, ..
82                                  libs, ..
83                                  library_name, ..
84                                  with_gateway, ..
85                                  ldflags, ..
86                                  cflags, ..
87                                  fflags, ..
88                                  cc);
89   end
90 endfunction
91 //=============================================================================