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

- removed unused local variable

git-svn-id: branches/hlcgllvm@26983 -
Jonas Maebe 11 years ago
parent
9c674ff444
commit
f629f38bbc
1 changed files with 0 additions and 1 deletions
Unified View Show Diff Stats
  1. 0 1
      compiler/ncgcal.pas

+ 0 - 1
compiler/ncgcal.pas
View File 

@@ -146,7 +146,6 @@ implementation
 
     procedure tcgcallnode.reorder_parameters;
 
     procedure tcgcallnode.reorder_parameters;
 
       var
 
       var
 
         hpcurr,hpprev,hpnext,hpreversestart : tcgcallparanode;
 
         hpcurr,hpprev,hpnext,hpreversestart : tcgcallparanode;
 
-        currloc : tcgloc;
 
       begin
 
       begin
 
         { All parameters are now in temporary locations. If we move them to
 
         { All parameters are now in temporary locations. If we move them to
 
           their regular locations in the same order, then we get the
 
           their regular locations in the same order, then we get the