diff options
Diffstat (limited to 'gcc/ada/xref_lib.ads')
-rw-r--r-- | gcc/ada/xref_lib.ads | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/gcc/ada/xref_lib.ads b/gcc/ada/xref_lib.ads index 1282ad142dc..a6903105687 100644 --- a/gcc/ada/xref_lib.ads +++ b/gcc/ada/xref_lib.ads @@ -6,9 +6,9 @@ -- -- -- S p e c -- -- -- --- $Revision: 1.20 $ +-- $Revision$ -- -- --- Copyright (C) 1998-1999 Free Software Foundation, Inc. -- +-- Copyright (C) 1998-2001 Free Software Foundation, 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- -- @@ -68,10 +68,9 @@ package Xref_Lib is -- this procedure. Glob indicates if we should use the 'globbing -- patterns' (True) or the full regular expressions (False) - procedure Add_File (File : String); - -- Add a new file in the list of files to search for references. - -- File is considered to be a globbing regular expression, which is thus - -- expanded + procedure Add_Xref_File (File : String); + -- Add a new file in the list of files to search for references. File + -- is interpreted as a globbing regular expression, which is expanded. Invalid_Argument : exception; -- Exception raised when there is a syntax error in the command line @@ -155,7 +154,6 @@ package Xref_Lib is -- if Dependencies is True, the insert every library file 'with'ed in -- the files database (used for gnatxref) - private type Rec_DIR is limited record Dir : GNAT.Directory_Operations.Dir_Type; |