re PR ada/33688 (Ada package Gnat.Sockets missing constant for IP_PKTINFO (patch))

PR ada/33688 * g-soccon-darwin.ads: Define new constant IP_PKTINFO. From-SVN: r133814

re PR ada/33688 (Ada package Gnat.Sockets missing constant for IP_PKTINFO (patch))
PR ada/33688 * g-soccon-darwin.ads: Define new constant IP_PKTINFO. From-SVN: r133814
51e5c7b5 · John David Anglin · John David Anglin · b739176e · 51e5c7b5 · 51e5c7b5
Commit 51e5c7b5 authored Apr 02, 2008 by John David Anglin Committed by John David Anglin Apr 02, 2008
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 0 deletions

gcc/ada/ChangeLog
+3 -0

gcc/ada/g-soccon-darwin.ads
+1 -0

No files found.
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
 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.
--- 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 --