with Adam.Results; with Gnat.Directory_Operations; use Gnat; use Adam; package Adam.Compiling_System is Path : constant String := Directory_Operations.Expand_Path(Working_Directory); Specifications_Filenames_Search : Results.Spawn_Result_Type; Implementations_Filenames_Search : Results.Spawn_Result_Type; procedure Initialize; procedure Replace_description (Var_Name : in String; Value : in String; Node : in String); procedure Main_Description (Var_Name : in String; Value : in String; Node : in String); end Adam.Compiling_System;