Преглед на файлове

+ Merged revision 300

git-svn-id: branches/fixes_2_0@302 -
michael преди 20 години
родител
ревизия
f864c3df35
променени са 2 файла, в които са добавени 0 реда и са изтрити 6 реда
  1. 0 3
      rtl/inc/astrings.inc
  2. 0 3
      rtl/inc/wstrings.inc

+ 0 - 3
rtl/inc/astrings.inc

@@ -106,9 +106,6 @@ Begin
   If declocked(l^) then
     { Ref count dropped to zero }
     DisposeAnsiString (S);        { Remove...}
-{$ifndef decrrefnotnil}
-  s:=nil;
-{$endif}
 end;
 
 { also define alias for internal use in the system unit }

+ 0 - 3
rtl/inc/wstrings.inc

@@ -188,9 +188,6 @@ Begin
   If declocked(l^) then
     { Ref count dropped to zero }
     DisposeWideString (S);        { Remove...}
-{$ifndef decrrefnotnil}
-  s:=nil;
-{$endif}
 end;
 
 { alias for internal use }