diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-04-24 15:04:40 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-04-24 15:04:40 +0200 |
| commit | dba44dbef91efd698ead6dcce7b19a24a4522000 (patch) | |
| tree | d41774edc5e71ca4dd9eb0d1a97fbbbe701d2d1e /gcc/ada/g-socket.adb | |
| parent | ca3e17b09114fea7ff08ed215ae79482ad16b706 (diff) | |
| download | gcc-dba44dbef91efd698ead6dcce7b19a24a4522000.tar.gz | |
[multiple changes]
2013-04-24 Robert Dewar <dewar@adacore.com>
* exp_ch13.adb, sem_prag.adb: Update comments.
* sem_ch3.adb, exp_ch9.adb, g-socket.adb, sem_ch13.adb: Minor
reformatting.
2013-04-24 Doug Rupp <rupp@adacore.com>
* vms_data.ads (/{NO}INHIBIT-EXEC): Document new default behavior.
2013-04-24 Yannick Moy <moy@adacore.com>
* sinfo.ads: Minor correction of typo.
From-SVN: r198223
Diffstat (limited to 'gcc/ada/g-socket.adb')
| -rw-r--r-- | gcc/ada/g-socket.adb | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/gcc/ada/g-socket.adb b/gcc/ada/g-socket.adb index 04a4b86c692..87493d2f60b 100644 --- a/gcc/ada/g-socket.adb +++ b/gcc/ada/g-socket.adb @@ -2221,10 +2221,8 @@ package body GNAT.Sockets is Status : out Boolean) is function C_Set_Close_On_Exec - (Socket : Socket_Type; Close_On_Exec : C.int) - return C.int; + (Socket : Socket_Type; Close_On_Exec : C.int) return C.int; pragma Import (C, C_Set_Close_On_Exec, "__gnat_set_close_on_exec"); - begin Status := C_Set_Close_On_Exec (Socket, Boolean'Pos (Close_On_Exec)) = 0; end Set_Close_On_Exec; |