mlib-tgt-specific-vxworks.adb: Minor reformatting.

2011-11-23  Thomas Quinot  <quinot@adacore.com>

	* mlib-tgt-specific-vxworks.adb: Minor reformatting.

2011-11-23  Thomas Quinot  <quinot@adacore.com>

	* Make-generated.in (Sdefault.Target_Name): Set to
	$(target_noncanonical) instead of $(target) for consistency.

From-SVN: r181669

diff --git a/gcc/ada/Make-generated.in b/gcc/ada/Make-generated.in
index ac52e491eeb68572760fdc3186c0fbab0580907c..833d47f25824a07222636de69d80f3edda26fc0b 100644 (file)
--- a/gcc/ada/Make-generated.in
+++ b/gcc/ada/Make-generated.in
@@ -72,7 +72,7 @@ $(ADA_GEN_SUBDIR)/stamp-sdefault : $(srcdir)/version.c Makefile
        $(ECHO) "   S0 : constant String := \"$(prefix)/\";" >>tmp-sdefault.adb
        $(ECHO) "   S1 : constant String := \"$(ADA_INCLUDE_DIR)/\";" >>tmp-sdefault.adb
        $(ECHO) "   S2 : constant String := \"$(ADA_RTL_OBJ_DIR)/\";" >>tmp-sdefault.adb
-       $(ECHO) "   S3 : constant String := \"$(target)/\";" >>tmp-sdefault.adb
+       $(ECHO) "   S3 : constant String := \"$(target_noncanonical)/\";" >>tmp-sdefault.adb
        $(ECHO) "   S4 : constant String := \"$(libsubdir)/\";" >>tmp-sdefault.adb
        $(ECHO) "   function Include_Dir_Default_Name return String_Ptr is" >>tmp-sdefault.adb
        $(ECHO) "   begin" >>tmp-sdefault.adb

diff --git a/gcc/ada/mlib-tgt-specific-vxworks.adb b/gcc/ada/mlib-tgt-specific-vxworks.adb
index 1e1fad1d7774e21c89470aabb4de95efcfdb0973..17a9d74a17fd16feff04a3a3d8ab20bc88045b1d 100644 (file)
--- a/gcc/ada/mlib-tgt-specific-vxworks.adb
+++ b/gcc/ada/mlib-tgt-specific-vxworks.adb
@@ -7,7 +7,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 2003-2008, Free Software Foundation, Inc.         --
+--          Copyright (C) 2003-2011, Free Software Foundation, 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- --
@@ -132,9 +132,9 @@ package body MLib.Tgt.Specific is
       return "";
    end Dynamic_Option;
 
-   -----------------------------
+   -----------------------
    -- Get_Target_Suffix --
-   -----------------------------
+   -----------------------
 
    function Get_Target_Suffix return String is
       Target_Name : constant String := Sdefault.Target_Name.all;