[Ada] gnat.dg/socket[12].adb test duplicates?

[Laurent GUERBY]

Hi Arnaud,

gnat.dg/socket1.adb and socket2.adb are identical AFAICT, is there a
special reason to have both? I couldn't find a ChangeLog entry for these
tests.

Thanks in advance,

Laurent

--- ../gcc-4.3.0-RC-20080222/gcc/testsuite/gnat.dg/socket2.adb  2007-06-14 
11:24:07.000000000 +0200
+++ ../gcc-4.3.0-RC-20080222/gcc/testsuite/gnat.dg/socket1.adb  2007-06-06 
12:54:25.000000000 +0200
@@ -1,7 +1,7 @@
---  { dg-do run }
+-- { dg-do run }
 
 with GNAT.Sockets; use GNAT.Sockets;
-procedure socket2 is
+procedure socket1 is
    X : Character;
 begin
    X := 'x';
@@ -11,4 +11,4 @@
    begin
       null;
    end;
-end socket2;
+end socket1;