* gcc-interface/trans.c (Subprogram_Body_to_gnu): Pop the stack of

[pf3gnuchains/gcc-fork.git] / gcc / ada / prj-util.adb

diff --git a/gcc/ada/prj-util.adb b/gcc/ada/prj-util.adb
index c1f9409..9454f9f 100644 (file)
--- a/gcc/ada/prj-util.adb
+++ b/gcc/ada/prj-util.adb
@@ -128,8 +128,8 @@ package body Prj.Util is
    ---------------
 
    procedure Duplicate
-     (This    : in out Name_List_Index;
-      Shared  : Shared_Project_Tree_Data_Access)
+     (This   : in out Name_List_Index;
+      Shared : Shared_Project_Tree_Data_Access)
    is
       Old_Current : Name_List_Index;
       New_Current : Name_List_Index;