commit:     aa60f5dd7b2bd3d34f1e98af744cbb2c227ae4c7
Author:     Tupone Alfredo <tupone <AT> gentoo <DOT> org>
AuthorDate: Sat Mar 11 22:02:02 2017 +0000
Commit:     Alfredo Tupone <tupone <AT> gentoo <DOT> org>
CommitDate: Sat Mar 11 22:02:45 2017 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=aa60f5dd

dev-lang/gnat-gpl: Fix build when using something like ADA=gcc-4.9.4

Package-Manager: portage-2.3.3

 dev-lang/gnat-gpl/files/gnat-gpl-2016-gentoo.patch | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/dev-lang/gnat-gpl/files/gnat-gpl-2016-gentoo.patch 
b/dev-lang/gnat-gpl/files/gnat-gpl-2016-gentoo.patch
index b715a006c21..ba037507aff 100644
--- a/dev-lang/gnat-gpl/files/gnat-gpl-2016-gentoo.patch
+++ b/dev-lang/gnat-gpl/files/gnat-gpl-2016-gentoo.patch
@@ -37,3 +37,21 @@
         %{!fsyntax-only:%(invoke_as)}}}}", 0, 0, 1},
     {"-",
      "%{!E:%e-E or -x required when input is from standard input}\
+--- gcc-4.9-gpl-2016-src/gcc/ada/osint.adb.old 2017-03-10 21:58:02.600710156 
+0100
++++ gcc-4.9-gpl-2016-src/gcc/ada/osint.adb     2017-03-10 21:59:38.033983293 
+0100
+@@ -2229,14 +2229,11 @@
+       for J in Start_Of_Prefix .. Name_Len - Prog'Length + 1 loop
+          if Name_Buffer (J .. J + Prog'Length - 1) = Prog then
+             End_Of_Prefix := J - 1;
++            Start_Of_Suffix := J + Prog'Length;
+             exit;
+          end if;
+       end loop;
+ 
+-      if End_Of_Prefix > 1 then
+-         Start_Of_Suffix := End_Of_Prefix + Prog'Length + 1;
+-      end if;
+-
+       --  Create the new program name
+ 
+       return new String'

Reply via email to