Merged revisions 87 via svnmerge from

/trunk

git-svn-id: branches/fixes_2_0@88 -

packages/base/md5/md5.pp

@@ -351,6 +351,7 @@ begin
       If (Count>0) then
         MD5Update(Context, Buf^, Count);
     Until (Count<BufSize);
+    FreeMem(Buf,BufSize);
     Close(F);
     end;
   MD5Final(Context, Result);