Private package: Ada.Directories.Win32

Private package: Ada.Directories.Win32_Information

pragma License (Modified_GPL);

with Win32.Winbase;

Win32 Implementation of the optional Ada.Directories.Information package.

For details of each routine, see the same named routine in the package Ada0Y.Directories.Information.

private package Ada.Directories.Win32_Information is

function Creation_Time (Name : in String)
   return Ada.Calendar.Time;

function Creation_Time (Name : in Directory_Entry_Type)
   return Ada.Calendar.Time;

function Is_Compressed (Name : in String)
   return Boolean;

function Is_Compressed (Name : in Directory_Entry_Type)
   return Boolean;

function Is_Encrypted (Name : in String)
   return Boolean;

function Is_Encrypted (Name : in Directory_Entry_Type)
   return Boolean;

function Is_Hidden (Name : in String)
   return Boolean;

function Is_Hidden (Name : in Directory_Entry_Type)
   return Boolean;

function Is_Not_Archived (Name : in String)
   return Boolean;

function Is_Not_Archived (Name : in Directory_Entry_Type)
   return Boolean;

function Is_Read_Only (Name : in String)
   return Boolean;

function Is_Read_Only (Name : in Directory_Entry_Type)
   return Boolean;

function Is_System (Name : in String)
   return Boolean;

function Is_System (Name : in Directory_Entry_Type)
   return Boolean;

function Last_Access_Time (Name : in String)
   return Ada.Calendar.Time;

function Last_Access_Time (Name : in Directory_Entry_Type)
   return Ada.Calendar.Time;

private

   --  Implementation-defined ...

end Ada.Directories.Win32_Information;