mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-03 12:30:31 +02:00
- removed unused variable
This commit is contained in:
parent
d47a5f9aea
commit
113608e577
@ -356,8 +356,6 @@ implementation
|
||||
|
||||
|
||||
function trangenode.det_resulttype : tnode;
|
||||
var
|
||||
ct : tconverttype;
|
||||
begin
|
||||
result:=nil;
|
||||
resulttypepass(left);
|
||||
@ -709,7 +707,10 @@ begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.37 2002-11-27 02:37:14 peter
|
||||
Revision 1.38 2002-12-07 14:12:56 carl
|
||||
- removed unused variable
|
||||
|
||||
Revision 1.37 2002/11/27 02:37:14 peter
|
||||
* case statement inlining added
|
||||
* fixed inlining of write()
|
||||
* switched statementnode left and right parts so the statements are
|
||||
|
Loading…
Reference in New Issue
Block a user