Remove compiler hints

Author: pyscripter

Tests/MethodCallBackTest.pas

@@ -155,13 +155,17 @@ procedure TMethodCallbackTest.TestBug01;
  Assert.AreEqual(0, CodeMemPageCount);
 
  for i:=1 to AllocCount do
+ begin
  ptr:=GetCallBack(fTestObj, @TTestObj.ThreeArgCdeclProcedure, 5, ctCdecl);
+ Assert.IsTrue(ptr <> nil);
+ end;
 
  // there should still be 1 page allocated
  Assert.AreEqual(1, CodeMemPageCount);
 
  // get one callback more and we should have 2 pages
  ptr:=GetCallBack(fTestObj, @TTestObj.ThreeArgCdeclProcedure, 5, ctCdecl);
+ Assert.IsTrue(ptr <> nil);
  // getting CodeMemPageCount would crash as the next page pointer was overwritten by the
  // last allocation
  Assert.AreEqual(2, CodeMemPageCount);
@@ -271,7 +275,10 @@ procedure TMethodCallbackTest.TestMemoryMgmt;
  Assert.AreEqual(0, CodeMemPageCount);
 
  for i:=1 to AllocCount do
+ begin
  ptr:=GetCallBack(fTestObj, @TTestObj.ThreeArgCdeclProcedure, 3, ctCdecl);
+ Assert.IsTrue(ptr <> nil);
+ end;
 
  // there should still be 1 page allocated
  Assert.AreEqual(1, CodeMemPageCount);
@@ -297,6 +304,7 @@ procedure TMethodCallbackTest.TestMemoryMgmt;
 
  // allocate one more and page count should go up to 2 again
  ptr:=GetCallBack(fTestObj, @TTestObj.ThreeArgCdeclProcedure, 3, ctCdecl);
+ Assert.IsTrue(ptr <> nil);
  Assert.AreEqual(2, CodeMemPageCount);
 end;