diff options
Diffstat (limited to 'debian/patches/ada-gcc-name.diff')
| -rw-r--r-- | debian/patches/ada-gcc-name.diff | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/debian/patches/ada-gcc-name.diff b/debian/patches/ada-gcc-name.diff index 0701a89..65fa8fa 100644 --- a/debian/patches/ada-gcc-name.diff +++ b/debian/patches/ada-gcc-name.diff @@ -1,4 +1,4 @@ -# DP: use gcc-4.9 instead of gcc as the command name. +# DP: use gcc-5 instead of gcc as the command name. Index: b/src/gcc/ada/comperr.adb =================================================================== @@ -9,7 +9,7 @@ Index: b/src/gcc/ada/comperr.adb Write_Str - ("| Include the exact gcc or gnatmake command " & -+ ("| Include the exact gcc-4.9 or gnatmake command " & ++ ("| Include the exact gcc-5 or gnatmake command " & "that you entered."); End_Line; @@ -22,7 +22,7 @@ Index: b/src/gcc/ada/gnatlink.adb -- generated file. - Gcc : String_Access := Program_Name ("gcc", "gnatlink"); -+ Gcc : String_Access := Program_Name ("gcc-4.9", "gnatlink"); ++ Gcc : String_Access := Program_Name ("gcc-5", "gnatlink"); Read_Mode : constant String := "r" & ASCII.NUL; @@ -32,7 +32,7 @@ Index: b/src/gcc/ada/gnatlink.adb Write_Line (" --GCC=comp Use comp as the compiler"); - Write_Line (" --LINK=nam Use 'nam' for the linking rather than 'gcc'"); + Write_Line (" --LINK=nam Use 'nam' for the linking rather " & -+ "than 'gcc-4.9'"); ++ "than 'gcc-5'"); Write_Eol; Write_Line (" [non-Ada-objects] list of non Ada object files"); Write_Line (" [linker-options] other options for the linker"); @@ -45,7 +45,7 @@ Index: b/src/gcc/ada/make.adb ---------------------------------------------------- - Gcc : String_Access := Program_Name ("gcc", "gnatmake"); -+ Gcc : String_Access := Program_Name ("gcc-4.9", "gnatmake"); ++ Gcc : String_Access := Program_Name ("gcc-5", "gnatmake"); Original_Gcc : constant String_Access := Gcc; -- Original_Gcc is used to check if Gcc has been modified by a switch -- --GCC=, so that for VM platforms, it is not modified again, as it can @@ -58,7 +58,7 @@ Index: b/src/gcc/ada/gnatchop.adb -- The name of the file holding the GNAT configuration pragmas - Gcc : String_Access := new String'("gcc"); -+ Gcc : String_Access := new String'("gcc-4.9"); ++ Gcc : String_Access := new String'("gcc-5"); -- May be modified by switch --GCC= Gcc_Set : Boolean := False; @@ -71,7 +71,7 @@ Index: b/src/gcc/ada/mdll-utl.adb Dlltool_Exec : OS_Lib.String_Access; - Gcc_Name : constant String := "gcc"; -+ Gcc_Name : constant String := "gcc-4.9"; ++ Gcc_Name : constant String := "gcc-5"; Gcc_Exec : OS_Lib.String_Access; Gnatbind_Name : constant String := "gnatbind"; @@ -80,7 +80,7 @@ Index: b/src/gcc/ada/mdll-utl.adb end if; - Print_Command ("gcc", Arguments (1 .. A)); -+ Print_Command ("gcc-4.9", Arguments (1 .. A)); ++ Print_Command ("gcc-5", Arguments (1 .. A)); OS_Lib.Spawn (Gcc_Exec.all, Arguments (1 .. A), Success); @@ -93,7 +93,7 @@ Index: b/src/gcc/ada/mlib-utl.adb if Gcc_Exec = null then if Gcc_Name = null then - Gcc_Name := Osint.Program_Name ("gcc", "gnatmake"); -+ Gcc_Name := Osint.Program_Name ("gcc-4.9", "gnatmake"); ++ Gcc_Name := Osint.Program_Name ("gcc-5", "gnatmake"); end if; Gcc_Exec := Locate_Exec_On_Path (Gcc_Name.all); @@ -106,7 +106,7 @@ Index: b/src/gcc/ada/prj-makr.adb procedure Dup2 (Old_Fd, New_Fd : File_Descriptor); - Gcc : constant String := "gcc"; -+ Gcc : constant String := "gcc-4.9"; ++ Gcc : constant String := "gcc-5"; Gcc_Path : String_Access := null; Non_Empty_Node : constant Project_Node_Id := 1; |