Explorar el Código

* fix memory leak of tcustomattr13

git-svn-id: trunk@43298 -
svenbarth hace 5 años
padre
commit
6f74dd4207
Se han modificado 1 ficheros con 1 adiciones y 0 borrados
  1. 1 0
      tests/test/tcustomattr13.pp

+ 1 - 0
tests/test/tcustomattr13.pp

@@ -190,6 +190,7 @@ begin
     strm.SetSize(ae.ArgLen);
     strm.SetSize(ae.ArgLen);
     Move(ae.ArgData^, strm.Memory^, ae.ArgLen);
     Move(ae.ArgData^, strm.Memory^, ae.ArgLen);
     CheckProcs[i](strm);
     CheckProcs[i](strm);
+    strm.Free;
   end;
   end;
   Writeln('ok');
   Writeln('ok');
 end.
 end.