diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-10-04 15:00:26 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-10-04 15:00:26 +0000 |
| commit | 931feadd66849f85f17262efea63b9d1684c1ffc (patch) | |
| tree | d6b4c7d1b9a3b05dab858f2d702da4e1be23cd63 /gcc/ada/g-dirope.ads | |
| parent | 90c17f9585263494810e0108857f1e4558405941 (diff) | |
| download | gcc-931feadd66849f85f17262efea63b9d1684c1ffc.tar.gz | |
2004-10-04 Sergey Rybin <rybin@act-europe.fr>
* g-dirope.ads (Base_Name): Clarify the meaning of the Suffix parameter
in the documentation.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88504 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/g-dirope.ads')
| -rw-r--r-- | gcc/ada/g-dirope.ads | 17 |
1 files changed, 11 insertions, 6 deletions
diff --git a/gcc/ada/g-dirope.ads b/gcc/ada/g-dirope.ads index c6c561d01cf..b24ecc01836 100644 --- a/gcc/ada/g-dirope.ads +++ b/gcc/ada/g-dirope.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1998-2003 Ada Core Technologies, Inc. -- +-- Copyright (C) 1998-2004 Ada Core Technologies, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -123,15 +123,20 @@ package GNAT.Directory_Operations is function Base_Name (Path : Path_Name; Suffix : String := "") return String; - -- Any directory prefix is removed. If Suffix is non-empty and is a - -- suffix of Path, it is removed. This is equivalent to the UNIX basename - -- command. The following rule is always true: + -- Any directory prefix is removed. A directory prefix is defined as + -- text up to and including the last directory separator character in + -- the input string. In addition if Path ends with the string given for + -- Suffix, then it is also removed. Note that Suffix here can be an + -- arbitrary string (it is not required to be a file extension). This + -- is equivalent to the UNIX basename command. The following rule is + -- always true: -- -- 'Path' and 'Dir_Name (Path) & Directory_Separator & Base_Name (Path)' -- represent the same file. -- - -- This function is not case-sensitive on systems that have a non - -- case-sensitive file system like Windows and OpenVMS. + -- The comparison of Suffix is case-insensitive on systems such as Windows + -- and VMS where the file search is case-insensitive (e.g. on such systems, + -- Base_Name ("/Users/AdaCore/BB12.patch", ".Patch") returns "BB12"). function File_Extension (Path : Path_Name) return String; -- Return the file extension. This is defined as the string after the |