From 086436151f45e51a855c748010a95615bc5e30a0 Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Fri, 1 Nov 1996 08:45:18 +0000
Subject: [PATCH 1/1] Bug fix: used close on MS-Windows. Fixed to closesocket.

---
 comstack/tcpip.c |    9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/comstack/tcpip.c b/comstack/tcpip.c
index f9c48c0..f68577c 100644
--- a/comstack/tcpip.c
+++ b/comstack/tcpip.c
@@ -4,7 +4,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: tcpip.c,v $
- * Revision 1.12  1996-07-06 19:58:30  quinn
+ * Revision 1.13  1996-11-01 08:45:18  adam
+ * Bug fix: used close on MS-Windows. Fixed to closesocket.
+ *
+ * Revision 1.12  1996/07/06 19:58:30  quinn
  * System headerfiles gathered in yconfig
  *
  * Revision 1.11  1996/02/23  10:00:39  quinn
@@ -535,7 +538,11 @@ int tcpip_close(COMSTACK h)
     tcpip_state *sp = h->private;
 
     TRC(fprintf(stderr, "tcpip_close\n"));
+#ifdef WINDOWS
+    closesocket(h->iofile);
+#else
     close(h->iofile);
+#endif
     if (sp->altbuf)
         xfree(sp->altbuf);
     xfree(sp);
-- 
1.7.10.4