Files
xmlada/shared.gpr
Emmanuel Briot 08e2e783b4 Add missing when clauses
git-svn-id: svn+ssh://svn.eu.adacore.com/Dev/importfromcvs/trunk@11809 936e1b1b-40f2-da11-902a-00137254ae57
2004-06-15 07:04:38 +00:00

69 lines
1.9 KiB
Plaintext

project Shared is
Version := "1.1w";
type Library_Type_Type is ("relocatable", "static");
Library_Type : Library_Type_Type := external ("LIBRARY_TYPE", "static");
for Source_Dirs use ();
type Mode_Type is ("distrib", "debug", "optimize", "profile");
Mode : Mode_Type := external ("MODE", "optimize");
package Builder is
case Mode is
when "debug" =>
for Default_Switches ("Ada") use ("-g", "-gnatVa", "-fstack-check");
-- for Global_Configuration_Pragmas use "gnat.adc";
when "optimize" =>
for Default_Switches ("Ada") use ("-O2");
for Global_Configuration_Pragmas use "gnat_optimize.adc";
when others =>
for Default_Switches ("Ada") use ("-g", "-O2");
end case;
end Builder;
package compiler is
warnings := ("-gnatwua", "-gnaty", "-gnatQ");
case Mode is
when "distrib" =>
for Default_Switches ("Ada") use ("-O2", "-gnatN");
when "debug" =>
for Default_Switches ("Ada") use warnings
& ("-g", "-gnata", "-gnatVaMI");
when "optimize" =>
for Default_Switches ("Ada") use warnings
& ("-O2", "-gnatN", "-gnatp");
when "profile" =>
for Default_Switches ("Ada") use warnings & ("-g", "-pg");
end case;
end compiler;
package binder is
case Mode is
when "debug" =>
for Default_Switches ("Ada") use ("-E");
when "distrib" | "optimize" | "profile" =>
end case;
end binder;
package linker is
case Mode is
when "profile" =>
for Default_Switches ("Ada") use ("-pg");
-- when "debug" =>
-- for Default_Switches ("Ada") use ("-lgmem");
when "distrib" =>
for Default_Switches ("Ada") use ("-s");
when "optimize" | "debug" =>
end case;
end linker;
end Shared;