summaryrefslogtreecommitdiff
path: root/gcc/ada/g-socthi-mingw.ads
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2004-11-25 17:14:01 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2004-11-25 17:14:01 +0100
commit670d2c11f50be49b96293634720c460df8a2ca7e (patch)
treeda2abb4cd5d3f218aba3a277133f9b43726b254f /gcc/ada/g-socthi-mingw.ads
parent061fd2bfd9ba0e374f4dad0e1ea932a9f02ec63e (diff)
downloadgcc-670d2c11f50be49b96293634720c460df8a2ca7e.tar.gz
g-socthi-mingw.ads, [...]: Remove C_Read and C_Write from internal implementation unit GNAT.Sockets.Thin...
* g-socthi-mingw.ads, g-socthi-vms.ads: Remove C_Read and C_Write from internal implementation unit GNAT.Sockets.Thin, as their usage for sockets is non-portable (using the read and write functions from the system runtime library is fine on UNIX but won't work under Windows). * mingw32.h: Update copyright notice. From-SVN: r91297
Diffstat (limited to 'gcc/ada/g-socthi-mingw.ads')
-rw-r--r--gcc/ada/g-socthi-mingw.ads12
1 files changed, 0 insertions, 12 deletions
diff --git a/gcc/ada/g-socthi-mingw.ads b/gcc/ada/g-socthi-mingw.ads
index f13b907ecf0..33567a8cb71 100644
--- a/gcc/ada/g-socthi-mingw.ads
+++ b/gcc/ada/g-socthi-mingw.ads
@@ -262,11 +262,6 @@ package GNAT.Sockets.Thin is
(S : C.int;
Backlog : C.int) return C.int;
- function C_Read
- (Fildes : C.int;
- Buf : System.Address;
- Nbyte : C.int) return C.int;
-
function C_Readv
(Socket : C.int;
Iov : System.Address;
@@ -329,11 +324,6 @@ package GNAT.Sockets.Thin is
function C_System
(Command : System.Address) return C.int;
- function C_Write
- (Fildes : C.int;
- Buf : System.Address;
- Nbyte : C.int) return C.int;
-
function C_Writev
(Socket : C.int;
Iov : System.Address;
@@ -408,7 +398,6 @@ private
pragma Import (Stdcall, C_Inet_Addr, "inet_addr");
pragma Import (Stdcall, C_Ioctl, "ioctlsocket");
pragma Import (Stdcall, C_Listen, "listen");
- pragma Import (C, C_Read, "_read");
pragma Import (Stdcall, C_Recv, "recv");
pragma Import (Stdcall, C_Recvfrom, "recvfrom");
pragma Import (Stdcall, C_Send, "send");
@@ -418,7 +407,6 @@ private
pragma Import (Stdcall, C_Socket, "socket");
pragma Import (C, C_Strerror, "strerror");
pragma Import (C, C_System, "_system");
- pragma Import (C, C_Write, "_write");
pragma Import (Stdcall, Socket_Errno, "WSAGetLastError");
pragma Import (Stdcall, Set_Socket_Errno, "WSASetLastError");
pragma Import (Stdcall, WSAStartup, "WSAStartup");