Fix SCons 1.2.0 build failure

[senf.git] / Socket / Protocols / INet / TCPSocketProtocol.cc

diff --git a/Socket/Protocols/INet/TCPSocketProtocol.cc b/Socket/Protocols/INet/TCPSocketProtocol.cc
index a11ac98..3c88242 100644 (file)
--- a/Socket/Protocols/INet/TCPSocketProtocol.cc
+++ b/Socket/Protocols/INet/TCPSocketProtocol.cc
@@ -75,6 +75,19 @@ prefix_ unsigned senf::TCPSocketProtocol::siocoutq()
     return n;
 }
 
+prefix_ void senf::TCPSocketProtocol::shutdown(ShutType type)
+    const
+{
+    if (::shutdown(fd(), type) < 0)
+        SENF_THROW_SYSTEM_EXCEPTION("::shutdown()");
+}
+
+prefix_ void senf::TCPSocketProtocol::close()
+{
+    shutdown(ShutRDWR);
+    INetSocketProtocol::close();
+}
+
 prefix_ unsigned senf::TCPSocketProtocol::available()
     const
 {