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

* Commented out unused var.

git-svn-id: trunk@11486 -
yury 17 years ago
parent
cc2b525e9d
commit
db5f3f6662
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      compiler/ncginl.pas

+ 1 - 1
compiler/ncginl.pas
View File 

@@ -722,7 +722,7 @@ implementation
 
     procedure tcginlinenode.second_rox;
 
     procedure tcginlinenode.second_rox;
 
       var
 
       var
 
         op : topcg;
 
         op : topcg;
 
-        hcountreg : tregister;
 
+        {hcountreg : tregister;}
 
         op1,op2 : tnode;
 
         op1,op2 : tnode;
 
       begin
 
       begin
 
         { one or two parameters? }
 
         { one or two parameters? }