PR ada/33688

	* g-soccon-darwin.ads: Define new constant IP_PKTINFO.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@133814 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 00ae0d6..c3e49b9 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,5 +1,8 @@
 2008-04-01  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
 
+       PR ada/33688
+       * g-soccon-darwin.ads: Define new constant IP_PKTINFO.
+
        PR ada/33857
        * env.c: Always include crt_externs.h if __APPLE__ is defined.
        (__gnat_setenv): Use setenv instead of putenv if __APPLE__ is defined.

diff --git a/gcc/ada/g-soccon-darwin.ads b/gcc/ada/g-soccon-darwin.ads
index 495b7b3..8b4ac61 100644 (file)
--- a/gcc/ada/g-soccon-darwin.ads
+++ b/gcc/ada/g-soccon-darwin.ads
@@ -163,6 +163,7 @@ package GNAT.Sockets.Constants is
    IP_MULTICAST_LOOP  : constant :=          11; --  Set/get mcast loopback
    IP_ADD_MEMBERSHIP  : constant :=          12; --  Join a multicast group
    IP_DROP_MEMBERSHIP : constant :=          13; --  Leave a multicast group
+   IP_PKTINFO         : constant :=          -1; --  Get datagram info
 
    -------------------
    -- System limits --