mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 17:49:07 +02:00
* remove unused variables
This commit is contained in:
parent
3b8fcfc6eb
commit
80e8dce98f
@ -375,10 +375,6 @@ procedure fail;
|
|||||||
WriteLn('Success!');
|
WriteLn('Success!');
|
||||||
end;
|
end;
|
||||||
|
|
||||||
var
|
|
||||||
r: longint;
|
|
||||||
_success : boolean;
|
|
||||||
l: boolean;
|
|
||||||
Begin
|
Begin
|
||||||
{$ifdef SKIP_CURRENCY_TEST}
|
{$ifdef SKIP_CURRENCY_TEST}
|
||||||
Writeln('Skipping currency test because its not supported by theis compiler');
|
Writeln('Skipping currency test because its not supported by theis compiler');
|
||||||
|
Loading…
Reference in New Issue
Block a user