- do not set the parameter to nil in strings.strdispose, because it's not a var

parameter and the operation is therefore useless

git-svn-id: trunk@32025 -

rtl/inc/strings.pp

@@ -155,10 +155,7 @@ implementation
 
       begin
          if p<>nil then
-          begin
-            freemem(p);
-            p:=nil;
-          end;
+           freemem(p);
       end;
 
 end.