Re: Conditional Compilation in Ada

[Chrono <pablittto@gmail.com>]

On 29 jun, 09:15, sjw <simon.j.wri...@mac.com> wrote:
> On Jun 29, 12:42 pm, sjw <simon.j.wri...@mac.com> wrote:
>
> >    type Environment is ("Real", "Simulated");
> >    Env : Environment := external ("ENVIRONMENT");
> >    case Env is
> >       when "Real" => Env_Path = "Real";
> >       when "Simulated" => Env_Path = "Simulated";
> >    end case;
> >    for Source_Dirs use ..... & Env_Path;
>
> > (I haven't tested this particular example ...)
>
> Ahem. A version which works is
>
> project T is
>    type Environment is ("Real", "Simulated");
>    Env : Environment := external ("ENVIRONMENT");
>    Base_Path := (".");
>    Real_Path := ("Real");
>    Sim_Path := ("Simulated");
>    case Env is
>       when "Real" => for Source_Dirs use Base_Path & Real_Path;
>       when "Simulated" => for Source_Dirs use Base_Path & Sim_Path;
>    end case;
> end T;
>
> When GPS sees this, the Scenario view (Tools > Views > Scenario offers
> ENVIRONMENT with the choices Real, Simulated.

Well, creating folders for each scenario is definitely not a better
solution than using a prep script, mainly in a project with high
complexity in its architecture. Even creating new packages for doing
this (or new variables which are going to be compiled with main code),
due to requirements restrictions. But thanks even though for all
responses.