From 51e5c7b5add4416e66532bf92c6641712a9edad9 Mon Sep 17 00:00:00 2001 From: John David Anglin Date: Wed, 2 Apr 2008 01:02:58 +0000 Subject: [PATCH] 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 --- gcc/ada/ChangeLog | 3 +++ gcc/ada/g-soccon-darwin.ads | 1 + 2 files changed, 4 insertions(+) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 00ae0d60ee6..c3e49b92727 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,8 @@ 2008-04-01 John David Anglin + 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 495b7b33fb0..8b4ac6154a6 100644 --- 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 --