diff options
| author | Vincent Celier <celier@adacore.com> | 2008-04-08 08:52:51 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-04-08 08:52:51 +0200 |
| commit | 189641a279ecf39b29c4f903395c31477aad7a8d (patch) | |
| tree | 9ade13da7f120ba215520abecf2afad5e68d6c7d /gcc/ada/makeutl.ads | |
| parent | f7d5442e99264f95e19868931a0ec530f26a19f5 (diff) | |
| download | gcc-189641a279ecf39b29c4f903395c31477aad7a8d.zip gcc-189641a279ecf39b29c4f903395c31477aad7a8d.tar.gz gcc-189641a279ecf39b29c4f903395c31477aad7a8d.tar.bz2 | |
make.adb: (Gnatmake_Called): Remove, no longer necessary
2008-04-08 Vincent Celier <celier@adacore.com>
Thomas Quinot <quinot@adacore.com>
* make.adb: (Gnatmake_Called): Remove, no longer necessary
(Compile_Surces): Call Delete_Temp_Config_Files only if Gnatmake_Called
is True and Debug_Flag_N is False. Debug_Flag_N means "keep temp files".
(Insert_Project_Sources): Take into account index in multi-unit source
files.
After building a library project, delete all temporary files.
(Initialize): Reset current output after parsing project file.
(Collect_Arguments_And_Compile): Never insert in the queue the sources
of library projects that are externally built.
Put file name in error and inform messages if -df is used
(Display): If invoked with -d7, do not display path names, but only
file names.
* makeutl.ads (Path_Or_File_Name): New function
(Path_Or_File_Name): New function
From-SVN: r134039
Diffstat (limited to 'gcc/ada/makeutl.ads')
| -rw-r--r-- | gcc/ada/makeutl.ads | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gcc/ada/makeutl.ads b/gcc/ada/makeutl.ads index b03783c..9672744 100644 --- a/gcc/ada/makeutl.ads +++ b/gcc/ada/makeutl.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 2004-2007, Free Software Foundation, Inc. -- +-- Copyright (C) 2004-2008, 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- -- @@ -130,6 +130,9 @@ package Makeutl is -- For gnatbind switches, Including_L_Switch is False, because the -- argument of the -L switch is not a path. + function Path_Or_File_Name (Path : Path_Name_Type) return String; + -- Returns a file name if -df is used, otherwise return a path name + ---------------------- -- Marking Routines -- ---------------------- |