Thanks for fixing bug 4118. I had to apply the attached patch to get the current svn to compile under linux
Colin
diff -uNr trunk/fpcsrc/rtl/inc/wstrings.inc trunk.w/fpcsrc/rtl/inc/wstrings.inc
--- trunk/fpcsrc/rtl/inc/wstrings.inc	2005-06-26 09:39:22.000000000 +0100
+++ trunk.w/fpcsrc/rtl/inc/wstrings.inc	2005-06-26 09:49:25.000000000 +0100
@@ -633,7 +633,6 @@
           Dec(Pointer(S),WideFirstOff);
           if L*sizeof(WideChar)+WideRecLen>MemSize(Pointer(S)) then
               reallocmem(pointer(S), L*sizeof(WideChar)+WideRecLen);
-          end;
           Inc(Pointer(S), WideFirstOff);
         end
 {$endif MSWINDOWS}        
_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to