X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Fada%2Fg-socthi-vxworks.ads;fp=gcc%2Fada%2Fg-socthi-vxworks.ads;h=4b6bd34d080a01e28c9ddb99624d2d01b65df913;hb=2c195e6cb826d4fc6ba35c96c21bb07340751853;hp=88638f99d0217c47b2ff29cc4ed8dd1d2d5d9fab;hpb=147ce7fac36e1c7b44b3ee84d2eacf1071830d7b;p=pf3gnuchains%2Fgcc-fork.git

diff --git a/gcc/ada/g-socthi-vxworks.ads b/gcc/ada/g-socthi-vxworks.ads
index 88638f99d02..4b6bd34d080 100644
--- a/gcc/ada/g-socthi-vxworks.ads
+++ b/gcc/ada/g-socthi-vxworks.ads
@@ -55,17 +55,6 @@ package GNAT.Sockets.Thin is
      .. +(2 ** (C.size_t'Size - 1) - 1);
    --  Signed type of the same size as size_t
 
-   type Msghdr is record
-      Msg_Name       : System.Address;
-      Msg_Namelen    : C.unsigned;
-      Msg_Iov        : System.Address;
-      Msg_Iovlen     : C.size_t;
-      Msg_Control    : System.Address;
-      Msg_Controllen : C.size_t;
-      Msg_Flags      : C.int;
-   end record;
-   pragma Convention (C, Msghdr);
-
    function Socket_Errno return Integer renames GNAT.OS_Lib.Errno;
    --  Returns last socket error number