Fix error handling of Ada.Directories