1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
--
-- $Id: gnade.gpr,v 1.7 2007/09/07 21:05:40 persan Exp $
--
Project Gnade is
type Build_Type is ("Release", "Debug");
Build : Build_Type := External ("Build", "Debug");
for Languages use ("Ada");
for Source_Dirs use ();
for Object_Dir use "lib-obj/" & Build;
for Exec_Dir use ".";
package Builder is
for Default_Switches ("ada") use
("-s",
"-k",
"-j" & External ("NUMBER_OF_PROCESSORS", "1"));
case Build is
when "Release" =>
for Default_Switches ("ada") use
Builder'Default_Switches ("ada") & ("-O3");
when "Debug" =>
for Default_Switches ("ada") use
Builder'Default_Switches ("ada") & ("-g");
end case;
end Builder;
package Compiler is
for Default_Switches ("ada") use ("-gnat05",
"-gnatn",
"-gnatf",
"-gnatwa",
"-gnatwL",
"-gnaty3abefhiklM1640prtn");
case Build is
when "Release" =>
for Default_Switches ("ada") use
Compiler'Default_Switches ("ada") &
("-O3");
when "Debug" =>
for Default_Switches ("ada") use Compiler'Default_Switches ("ada") &
("-O0",
"-g");
end case;
end Compiler;
package Binder is
for Default_Switches ("ada") use ("-static", "-E");
end Binder;
package Linker is
case Build is
when "Release" =>
null;
when "Debug" =>
for Default_Switches ("ada") use
("-g");
end case;
end Linker;
package Naming is
for Specification_Suffix ("gesql") use ".gpq";
for Specification_Suffix ("sql") use ".sql";
end Naming;
package Ide is
for Vcs_Kind use "CVS";
end Ide;
end Gnade;
|
