--- Merging r31452 into '.':

U    packages/rtl-extra/src/inc/socketsh.inc
--- Recording mergeinfo for merge of r31452 into '.':
 U   .

# revisions: 31452

git-svn-id: branches/fixes_3_0@33388 -

packages/rtl-extra/src/inc/socketsh.inc

@@ -138,7 +138,8 @@ type
 
   TSockPairArray = Array[0..1] of Longint;
   TSockArray     = Array[1..2] of Longint;              //legacy
-
+  TSockAddr6      = sockaddr_in6;
+  PSockAddr6      = ^TSockAddr6;
   psockaddr_un = ^sockaddr_un;
   sockaddr_un = packed record
     {$ifdef SOCK_HAS_SINLEN}