From patchwork Thu Oct  4 09:06:06 2012
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Subject: [Ada] Project_Dir should not modify the case of its path name
Date: Wed, 03 Oct 2012 23:06:06 -0000
From: Arnaud Charlet <charlet@adacore.com>
X-Patchwork-Id: 189066
Message-Id: <20121004090606.GA28747@adacore.com>
To: gcc-patches@gcc.gnu.org
Cc: Vincent Celier <celier@adacore.com>

This patch ensures that when project'Project_Dir is used, the path will
not be modified, even on platforms where the file names are case
insensitive, such as Windows.

Tested on x86_64-pc-linux-gnu, committed on trunk

2012-10-04  Vincent Celier  <celier@adacore.com>

	* prj-proc.adb (Process_Package_Declaration): Use project
	directory display path name as the value of 'Project_Dir.


Index: prj-proc.adb
===================================================================
--- prj-proc.adb	(revision 192066)
+++ prj-proc.adb	(working copy)
@@ -1588,7 +1588,7 @@
                   Add_Attributes
                     (Project,
                      Project.Name,
-                     Name_Id (Project.Directory.Name),
+                     Name_Id (Project.Directory.Display_Name),
                      Shared,
                      Shared.Packages.Table (New_Pkg).Decl,
                      First_Attribute_Of