with Adam.Common;
use Adam.Common;
package Adam.Abstracts.Objects.Entries is
   
   type Entry_Type is tagged
      record
	 Parameters_Num : Natural := 0;
	 Results_Num    : Natural := 0;
	 Proc           : Procedure_Access;
	 Name           : String_Access;	 
      end record;
   
   type Entry_Array_Type is array (Positive range <>) of Entry_Type;
   
end Adam.Abstracts.Objects.Entries;