diff options
Diffstat (limited to 'gcc/ada/mlib-tgt.adb')
| -rw-r--r-- | gcc/ada/mlib-tgt.adb | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/gcc/ada/mlib-tgt.adb b/gcc/ada/mlib-tgt.adb index 267177b..0f27810 100644 --- a/gcc/ada/mlib-tgt.adb +++ b/gcc/ada/mlib-tgt.adb @@ -7,7 +7,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2001-2004, Ada Core Technologies, Inc. -- +-- Copyright (C) 2001-2005, 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- -- @@ -172,8 +172,11 @@ package body MLib.Tgt is -- Library_Exists_For -- ------------------------ - function Library_Exists_For (Project : Project_Id) return Boolean is + function Library_Exists_For + (Project : Project_Id; In_Tree : Project_Tree_Ref) return Boolean + is pragma Unreferenced (Project); + pragma Unreferenced (In_Tree); begin return False; end Library_Exists_For; @@ -182,8 +185,12 @@ package body MLib.Tgt is -- Library_File_Name_For -- --------------------------- - function Library_File_Name_For (Project : Project_Id) return Name_Id is + function Library_File_Name_For + (Project : Project_Id; + In_Tree : Project_Tree_Ref) return Name_Id + is pragma Unreferenced (Project); + pragma Unreferenced (In_Tree); begin return No_Name; end Library_File_Name_For; |