Files
2024-06-01 19:43:04 +02:00

17 lines
271 B
Ada

with GPR2.Options;
with GPR2.Project.Tree;
procedure Main is
use GPR2;
Prj : Project.Tree.Object;
Opt : Options.Object;
begin
Opt.Add_Switch (Options.P, "demo.gpr");
if Prj.Load (Opt, Absent_Dir_Error => No_Error) then
null;
end if;
end Main;