* Remove hints (by Henrique Werlang)

git-svn-id: trunk@46443 -

packages/fcl-passrc/src/paswrite.pp

@@ -853,9 +853,7 @@ end;
 procedure TPasWriter.WriteRecordType(AType: TPasRecordType);
 
 Var
-  I : Integer;
   Temp : String;
-  el : TPasElement;
 
 begin
   Temp:='record';