On Fri, 13 Jan 2023, Bart via fpc-devel wrote:

Consider the follwoing program:
===
program test;

uses
 Version;

begin
 {$if TheVersion >= 1}
 writeln('Version 1 or higher');
 {$else}
 writeln('Version < 1');
 {$endif}
end.
===
unit version;

interface
const
 TheVersion = 1;

implementation

end.
===
Compile with -vh
You get the hint:  Unit "version" not used in test

This is obviously not true, without the unit version, the program won't compile.

Should I report this as a bug?

Yes.

Michael.
_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Reply via email to