Inicio Explorar Axuda
Iniciar sesión
pascal
/
fpc
réplica de https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Ficheiros Incidencias 0 Wiki
Explorar o código

* remove unused variable, reported by lagwagging on on forum.

marcoonthegit %!s(int64=2) %!d(string=hai) anos
pai
5cd3b65a4c
achega
40abb74356
Modificáronse 2 ficheiros con 0 adicións e 2 borrados
Dividir vista Mostrar estatísticas de Diff
  1. 0 1
      utils/h2pas/scan.l
  2. 0 1
      utils/h2pas/scan.pas

+ 0 - 1
utils/h2pas/scan.l
Ver ficheiro 

@@ -254,7 +254,6 @@ type
 
 
     procedure writetree(p: presobject);
 
     var
 
-     i : integer;
 
      localp: presobject;
 
      localp1: presobject;
 
      currentlevel : integer;

+ 0 - 1
utils/h2pas/scan.pas
Ver ficheiro 

@@ -257,7 +257,6 @@ type
 
 
     procedure writetree(p: presobject);
 
     var
 
-     i : integer;
 
      localp: presobject;
 
      localp1: presobject;
 
      currentlevel : integer;