X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Flib%2F16_hc.c;h=005244479b016aae5116a522307bc135253213d2;hb=d89b4d35446e64b0b8fd7c8fdcff32bcd0845e32;hp=df9602d8542e10e39bab97ff7146978caf0c7756;hpb=b95a3ae5a2c979c08f3b16eebe79dd2fd0f17615;p=16.git

diff --git a/src/lib/16_hc.c b/src/lib/16_hc.c
index df9602d8..00524447 100644
--- a/src/lib/16_hc.c
+++ b/src/lib/16_hc.c
@@ -24,13 +24,27 @@
 */
 
 #include "src/lib/16_hc.h"
+#pragma hdrstop
+
+#pragma warn -pro
+#pragma warn -use
 
 int heaphandle;
 
+#ifdef __BORLANDC__
+void * LargestFreeBlock(size_t* Size)
+#endif
+#ifdef __WATCOMC__
 void __near* LargestFreeBlock(size_t* Size)
+#endif
 {
 	size_t s0, s1;
+#ifdef __BORLANDC__
+	void * p;
+#endif
+#ifdef __WATCOMC__
 	void __near* p;
+#endif
 
 	s0 = ~(size_t)0 ^ (~(size_t)0 >> 1);
 #ifdef __BORLANDC__
@@ -89,7 +103,7 @@ size_t _coreleft(void)
 	for(;;)
 	{
 		size_t largest;
-		void __near* p = LargestFreeBlock(&largest);
+		void __near* p = (void __near *)LargestFreeBlock(&largest);
 		if (largest < sizeof(void __near*))
 		{
 			if (p != NULL)