Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* Remove unused variable

git-svn-id: trunk@41812 -
michael 6 years ago
parent
afa9ef279e
commit
cddc52a69f
1 changed files with 0 additions and 1 deletions
Unified View Show Diff Stats
  1. 0 1
      packages/fcl-registry/tests/tcxmlreg.pp

+ 0 - 1
packages/fcl-registry/tests/tcxmlreg.pp
View File 

@@ -66,7 +66,6 @@ procedure TTestXMLRegistry.TestReadBufDataString;
 
 
 
 Var
 
 Var
 
   S1,S2 : String;
 
   S1,S2 : String;
 
-  I : Smallint;
 
   DS : Integer;
 
   DS : Integer;
 
   dt : TDataType;
 
   dt : TDataType;