Browse Source

* changes for the winsock unit

florian 26 years ago
parent
commit
e6da269609
2 changed files with 13 additions and 3 deletions
  1. 7 2
      rtl/win32/Makefile
  2. 6 1
      rtl/win32/redef.inc

+ 7 - 2
rtl/win32/Makefile

@@ -65,7 +65,7 @@ LOADEROBJECTS=wprt0 wdllprt0
 
 # Unit Objects
 UNITOBJECTS=$(SYSTEMUNIT) objpas strings \
-	    windows ole2 opengl32 \
+            windows ole2 opengl32 winsock \
 	    dos crt objects \
 	    sysutils typinfo math \
 	    cpu mmx getopts heaptrc
@@ -208,6 +208,8 @@ windows$(PPUEXT) : windows.pp redef.inc $(WINDOWS_SOURCE_FILES) $(SYSTEMPPU)
 
 ole2$(PPUEXT) : ole2.pp windows$(PPUEXT) $(SYSTEMPPU)
 
+winsock$(PPUEXT) : winsock.pp windows$(PPUEXT) $(SYSTEMPPU)
+
 #
 # TP7 Compatible RTL Units
 #
@@ -382,7 +384,10 @@ endif
 
 #
 # $Log$
-# Revision 1.32  1999-06-10 15:02:15  peter
+# Revision 1.33  1999-06-18 13:59:49  florian
+#   * changes for the winsock unit
+#
+# Revision 1.32  1999/06/10 15:02:15  peter
 #   * last fixes for 0.99.12 release
 #
 # Revision 1.31  1999/05/13 22:38:03  peter

+ 6 - 1
rtl/win32/redef.inc

@@ -27,6 +27,8 @@ type
    PCharInfo = ^TCharInfo;
    TCharInfo = _CHAR_INFO;
 
+   TFarProc = FARPROC;
+
   procedure InitializeCriticalSection(var CriticalSection : TRTLCriticalSection);
   procedure EnterCriticalSection(var CriticalSection : TRTLCriticalSection);
   procedure LeaveCriticalSection(var CriticalSection : TRTLCriticalSection);
@@ -100,7 +102,10 @@ type
 
 {
   $Log$
-  Revision 1.3  1999-04-20 11:36:16  peter
+  Revision 1.4  1999-06-18 13:59:50  florian
+    * changes for the winsock unit
+
+  Revision 1.3  1999/04/20 11:36:16  peter
     * compatibility fixes
 
   Revision 1.2  1999/03/22 22:12:51  florian