Commit e23fbee4 by Robert Dewar Committed by Arnaud Charlet

osint.ads: Minor reformatting

2008-05-26  Robert Dewar  <dewar@adacore.com>

	* osint.ads: Minor reformatting

From-SVN: r135901
parent 1b762d7b
...@@ -173,9 +173,8 @@ package Osint is ...@@ -173,9 +173,8 @@ package Osint is
(Wildcard_Host_File : String; (Wildcard_Host_File : String;
Only_Dirs : Boolean) return String_Access_List_Access; Only_Dirs : Boolean) return String_Access_List_Access;
-- Expand a wildcard host syntax file or directory specification (e.g. on -- Expand a wildcard host syntax file or directory specification (e.g. on
-- a VMS host, any file or directory spec that contains: -- a VMS host, any file or directory spec that contains: "*", or "%", or
-- "*", or "%", or "...") -- "...") and return a list of valid Unix syntax file or directory specs.
-- and return a list of valid Unix syntax file or directory specs.
-- If Only_Dirs is True, then only return directories. -- If Only_Dirs is True, then only return directories.
function To_Canonical_Dir_Spec function To_Canonical_Dir_Spec
...@@ -369,10 +368,10 @@ package Osint is ...@@ -369,10 +368,10 @@ package Osint is
-- without any directory information. The implementation is responsible -- without any directory information. The implementation is responsible
-- for searching for the file in the appropriate directories. -- for searching for the file in the appropriate directories.
-- --
-- Note the special case that if the file name is gnat.adc, then the -- Note the special case that if the file name is gnat.adc, then the search
-- search for the file is done ONLY in the directory corresponding to -- for the file is done ONLY in the directory corresponding to the current
-- the current compilation environment, i.e. in the same directory -- compilation environment, i.e. in the same directory where the ali and
-- where the ali and object files will be written. -- object files will be written.
function Full_Source_Name return File_Name_Type; function Full_Source_Name return File_Name_Type;
function Current_Source_File_Stamp return Time_Stamp_Type; function Current_Source_File_Stamp return Time_Stamp_Type;
...@@ -508,14 +507,15 @@ package Osint is ...@@ -508,14 +507,15 @@ package Osint is
(Source_File : File_Name_Type; (Source_File : File_Name_Type;
Munit_Index : Nat := 0) return File_Name_Type; Munit_Index : Nat := 0) return File_Name_Type;
-- Given the name of a source file, returns the name of the corresponding -- Given the name of a source file, returns the name of the corresponding
-- library information file. This may be the name of the object file, or -- library information file. This may be the name of the object file or of
-- of a separate file used to store the library information. In either case -- a separate file used to store the library information. In the current
-- the returned result is suitable for use in a call to Read_Library_Info. -- implementation, a separate file (the ALI file) is always used. In either
-- The Munit_Index is the unit index in multiple unit per file mode, or -- case the returned result is suitable for calling Read_Library_Info. The
-- zero in normal single unit per file mode (used to add ~nnn suffix). -- Munit_Index is the unit index in multiple unit per file mode, or zero in
-- Note: this subprogram is in this section because it is used by the -- normal single unit per file mode (used to add ~nnn suffix). Note: this
-- compiler to determine the proper library information names to be placed -- subprogram is in this section because it is used by the compiler to
-- in the generated library information file. -- determine the proper library information names to be placed in the
-- generated library information file.
----------------- -----------------
-- Termination -- -- Termination --
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment