diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-08 06:57:18 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-08 06:57:18 +0000 |
| commit | e9b0f2470eb7f302c335d0ab41b12d89a2e56b89 (patch) | |
| tree | 2fa2116e4cbec5781fbbe21524d4cd95da62bb99 /gcc | |
| parent | dc3e043963910bff63fb16c3f169ad4f9e95a928 (diff) | |
| download | gcc-e9b0f2470eb7f302c335d0ab41b12d89a2e56b89.tar.gz | |
2008-04-08 Thomas Quinot <quinot@adacore.com>
* gen-soccon.c: Bump year in copyright notices.
* g-soccon-vxworks.ads: Add new constant IP_PKTINFO
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@134061 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/g-soccon-vxworks.ads | 18 | ||||
| -rw-r--r-- | gcc/ada/gen-soccon.c | 4 |
2 files changed, 12 insertions, 10 deletions
diff --git a/gcc/ada/g-soccon-vxworks.ads b/gcc/ada/g-soccon-vxworks.ads index 173a591c46e..16cf1feb48e 100644 --- a/gcc/ada/g-soccon-vxworks.ads +++ b/gcc/ada/g-soccon-vxworks.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 2000-2007, Free Software Foundation, Inc. -- +-- Copyright (C) 2000-2008, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -149,6 +149,7 @@ package GNAT.Sockets.Constants is TCP_NODELAY : constant := 1; -- Do not coalesce packets SO_REUSEADDR : constant := 4; -- Bind reuse local address + SO_REUSEPORT : constant := 512; -- Bind reuse port number SO_KEEPALIVE : constant := 8; -- Enable keep-alive msgs SO_LINGER : constant := 128; -- Defer close to flush data SO_BROADCAST : constant := 32; -- Can send broadcast msgs @@ -162,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 -- @@ -184,13 +186,6 @@ package GNAT.Sockets.Constants is Need_Netdb_Buffer : constant := 1; -- Need buffer for Netdb ops - ---------------------- - -- Additional flags -- - ---------------------- - - Thread_Blocking_IO : constant Boolean := True; - -- Set False for contexts where socket i/o are process blocking - -------------------------------- -- VxWorks-specific constants -- -------------------------------- @@ -201,4 +196,11 @@ package GNAT.Sockets.Constants is OK : constant := 0; -- VxWorks generic success ERROR : constant := -1; -- VxWorks generic error + ---------------------- + -- Additional flags -- + ---------------------- + + Thread_Blocking_IO : constant Boolean := True; + -- Set False for contexts where socket i/o are process blocking + end GNAT.Sockets.Constants; diff --git a/gcc/ada/gen-soccon.c b/gcc/ada/gen-soccon.c index a4dd957d67c..9067a146b0b 100644 --- a/gcc/ada/gen-soccon.c +++ b/gcc/ada/gen-soccon.c @@ -4,7 +4,7 @@ * * * G E N - S O C C O N * * * - * Copyright (C) 2004-2007, Free Software Foundation, Inc. * + * Copyright (C) 2004-2008, Free Software Foundation, Inc. * * * * GNAT is free software; you can redistribute it and/or modify it under * * terms of the GNU General Public License as published by the Free Soft- * @@ -104,7 +104,7 @@ TXT("-- G N A T . S O C K E T S . C O N S T A N T S TXT("-- --") TXT("-- S p e c --") TXT("-- --") -TXT("-- Copyright (C) 2000-2007, Free Software Foundation, Inc. --") +TXT("-- Copyright (C) 2000-2008, Free Software Foundation, Inc. --") TXT("-- --") TXT("-- GNAT is free software; you can redistribute it and/or modify it under --") TXT("-- terms of the GNU General Public License as published by the Free Soft- --") |