From: Arnaud Charlet <charlet@gcc.gnu.org>
Date: Wed, 30 Jul 2014 15:20:45 +0000 (+0200)
Subject: Code clean ups.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=72b4f1fc78acca3168f821caa3d347f430619f8f;p=gcc.git

Code clean ups.

From-SVN: r213302
---

diff --git a/gcc/ada/fe.h b/gcc/ada/fe.h
index f930315be54..9b889ff8da1 100644
--- a/gcc/ada/fe.h
+++ b/gcc/ada/fe.h
@@ -55,8 +55,7 @@ extern char Fold_Lower[], Fold_Upper[];
 #define Debug_Flag_NN debug__debug_flag_nn
 extern Boolean Debug_Flag_NN;
 
-/* einfo: We will be setting Esize for types, Component_Bit_Offset for fields,
-   Alignment for types and objects, Component_Size for array types.  */
+/* einfo: */
 
 #define Set_Alignment			einfo__set_alignment
 #define Set_Component_Bit_Offset	einfo__set_component_bit_offset
diff --git a/gcc/ada/scos.h b/gcc/ada/scos.h
index d997c9df83a..f7b4aba403c 100644
--- a/gcc/ada/scos.h
+++ b/gcc/ada/scos.h
@@ -37,7 +37,7 @@ typedef Int SCO_Unit_Index;
 
 struct SCO_Unit_Table_Entry
   {
-    Fat_Pointer File_Name;
+    String_Pointer File_Name;
     Int File_Index;
     Nat Dep_Num;
     Nat From, To;