"Refactoring->Unused units" crashes when unit FmtBCD is used
Original Reporter info from Mantis: kluug.net @onpok
-
Reporter name: Ondrej Pokorny
Original Reporter info from Mantis: kluug.net @onpok
- Reporter name: Ondrej Pokorny
Description:
If you start the "Unused units" tool from refactoring and the unit FmtBCD is in the uses clause, it crashes with:
fmtbcd.pp(816,32) Error: expected end., but record found
The problematic code part is:
{$define helper_declarations :=
const
__lo_bh = -( MaxFmtBCDFractionSize + 2 );
__hi_bh = ( MaxFmtBCDFractionSize + 1 );
type
tBCD_helper = Maybe_Packed record
Steps to reproduce:
Run "Unused units" on this program:
program Project1;
uses
FmtBCD;
begin
end.
Mantis conversion info:
- Mantis ID: 35370