aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_util.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2014-02-19 15:48:32 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2014-02-19 15:48:32 +0100
commit13f39091ea608a390dd56aabdec1ac6bb56846dd (patch)
tree2939b36369ceec25e8c911a56f5d25dd754b077d /gcc/ada/sem_util.adb
parent110e2969e057932e42f7a97332b1a840959ab685 (diff)
downloadgcc-13f39091ea608a390dd56aabdec1ac6bb56846dd.zip
gcc-13f39091ea608a390dd56aabdec1ac6bb56846dd.tar.gz
gcc-13f39091ea608a390dd56aabdec1ac6bb56846dd.tar.bz2
[multiple changes]
2014-02-19 Robert Dewar <dewar@adacore.com> * sem_util.adb, sem_util.ads, prj-conf.adb, s-os_lib.adb: Minor reformatting. 2014-02-19 Vincent Celier <celier@adacore.com> * prj-part.adb (Parse_Single_Project): Use the fully resolved project path, with all symbolic links resolved, to check if the same project is imported with a different unresolved path. * prj-tree.ads (Project_Name_And_Node): Component Canonical_Path changed to Resolved_Path to reflect that all symbolic links are resolved. From-SVN: r207904
Diffstat (limited to 'gcc/ada/sem_util.adb')
-rw-r--r--gcc/ada/sem_util.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb
index d21d648..a53e245 100644
--- a/gcc/ada/sem_util.adb
+++ b/gcc/ada/sem_util.adb
@@ -6443,7 +6443,6 @@ package body Sem_Util is
Error_Msg_N
("Operation First for iterable type must be unique", Aspect);
return Any_Type;
-
else
Cursor := Etype (Func);
end if;
@@ -6461,6 +6460,7 @@ package body Sem_Util is
return Cursor;
end Get_Cursor_Type;
+
-------------------------------
-- Get_Default_External_Name --
-------------------------------