suppress various warnings/hints

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1372 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
inoussa
2010-11-08 14:26:03 +00:00
parent eee543f190
commit 1c255f37a7
7 changed files with 11 additions and 9 deletions

View File

@ -634,7 +634,6 @@ begin
AddObj(AOwner,Result);
Except
Freemem(Result,resLen);
Result := nil;
Raise;
End;
end;
@ -668,7 +667,6 @@ begin
AddObj(AOwner,Result);
Except
Freemem(Result,resLen);
Result := nil;
Raise;
End;
end;