فهرست منبع

rtl: cleanup

git-svn-id: trunk@19352 -
paul 14 سال پیش
والد
کامیت
8fc6af7fde
1فایلهای تغییر یافته به همراه0 افزوده شده و 1 حذف شده
  1. 0 1
      rtl/inc/astrings.inc

+ 0 - 1
rtl/inc/astrings.inc

@@ -636,7 +636,6 @@ Var
   MaxI,Temp : SizeInt;
   cp1,cp2 : TSystemCodePage;
   r1,r2 : RawByteString;
-  u1,u2 : UTF8String;
 begin
   if pointer(S1)=pointer(S2) then
     begin